/ Acorn User: China / Acorn User China CD-ROM (UK) (Disc B) / Acorn User China CD-ROM (UK) (Disc B).bin / STUTTGART / FROMUTS / STARTREK00 / !StarTrek_!RunImage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1d f4 20 3e 20 | 3c 53 54 72 65 6b 24 44 |..... > |<STrek$D|
|00000010| 69 72 3e 2e 21 52 75 6e | 49 6d 61 67 65 0d 00 14 |ir>.!Run|Image...|
|00000020| 25 f4 20 41 64 61 70 74 | 65 64 20 66 6f 72 20 74 |%. Adapt|ed for t|
|00000030| 68 65 20 42 42 43 20 63 | 6f 6d 70 75 74 65 72 20 |he BBC c|omputer |
|00000040| 62 79 0d 00 1e 23 f4 20 | 54 2e 45 2e 4b 65 6e 6e |by...#. |T.E.Kenn|
|00000050| 69 6e 67 74 6f 6e 2c 20 | 4e 6f 76 20 31 39 38 33 |ington, |Nov 1983|
|00000060| 3b 20 61 6e 64 0d 00 28 | 26 f4 20 72 65 76 69 73 |; and..(|&. revis|
|00000070| 65 64 20 66 6f 72 20 41 | 72 63 68 69 6d 65 64 65 |ed for A|rchimede|
|00000080| 73 2c 20 41 75 67 20 31 | 39 38 38 0d 00 32 20 f4 |s, Aug 1|988..2 .|
|00000090| 20 62 79 20 4c 65 73 20 | 48 75 72 73 74 2c 20 42 | by Les |Hurst, B|
|000000a0| 6f 75 72 6e 65 6d 6f 75 | 74 68 2e 0d 00 3c 26 f4 |ournemou|th...<&.|
|000000b0| 20 47 72 61 70 68 69 63 | 61 6c 6c 79 20 61 64 61 | Graphic|ally ada|
|000000c0| 70 74 65 64 2f 52 65 77 | 72 69 74 74 65 6e 20 62 |pted/Rew|ritten b|
|000000d0| 79 0d 00 46 12 f4 20 41 | 6c 65 78 20 48 6f 70 6b |y..F.. A|lex Hopk|
|000000e0| 69 6e 73 0d 00 50 15 f4 | 20 33 30 20 52 6f 64 6e |ins..P..| 30 Rodn|
|000000f0| 65 79 20 43 6c 6f 73 65 | 0d 00 5a 0d f4 20 47 6f |ey Close|..Z.. Go|
|00000100| 73 70 6f 72 74 0d 00 64 | 14 f4 20 48 41 4e 54 53 |sport..d|.. HANTS|
|00000110| 20 50 4f 31 33 20 38 45 | 4a 0d 00 6e 1d f4 20 4e | PO13 8E|J..n.. N|
|00000120| 6f 76 65 6d 62 65 72 20 | 38 38 20 2d 20 4d 61 72 |ovember |88 - Mar|
|00000130| 63 68 20 38 39 2e 0d 00 | 78 13 f4 20 56 65 72 73 |ch 89...|x.. Vers|
|00000140| 69 6f 6e 20 47 2f 31 2e | 33 0d 00 82 05 3a 0d 00 |ion G/1.|3....:..|
|00000150| 8c 22 f4 20 74 69 6e 6b | 65 72 65 64 20 77 69 74 |.". tink|ered wit|
|00000160| 68 20 62 79 20 50 65 74 | 65 72 20 53 79 6b 65 73 |h by Pet|er Sykes|
|00000170| 0d 00 96 33 f4 20 39 36 | 20 4c 61 6e 65 68 6f 75 |...3. 96| Lanehou|
|00000180| 73 65 20 52 64 2c 20 54 | 68 6f 72 6e 61 62 79 2c |se Rd, T|hornaby,|
|00000190| 20 43 4c 45 56 45 4c 41 | 4e 44 20 54 53 31 37 20 | CLEVELA|ND TS17 |
|000001a0| 38 45 41 0d 00 a0 12 f4 | 20 4f 63 74 6f 62 65 72 |8EA.....| October|
|000001b0| 20 31 39 38 39 0d 00 aa | 05 3a 0d 00 b4 0c eb 20 | 1989...|.:..... |
|000001c0| 31 32 20 3a 20 87 0d 00 | be 12 ee 20 85 20 f2 65 |12 : ...|... . .e|
|000001d0| 72 72 6f 72 20 3a 20 e0 | 0d 00 c8 05 3a 0d 00 d2 |rror : .|....:...|
|000001e0| 23 f2 63 6f 6c 6f 75 72 | 73 20 3a 20 f2 73 70 72 |#.colour|s : .spr|
|000001f0| 69 74 65 4c 6f 61 64 20 | 3a 20 f2 73 65 74 75 70 |iteLoad |: .setup|
|00000200| 0d 00 dc 05 3a 0d 00 e6 | 05 f5 0d 00 f0 09 f2 69 |....:...|.......i|
|00000210| 6e 69 74 0d 00 fa 10 f2 | 65 6e 65 72 67 79 42 61 |nit.....|energyBa|
|00000220| 6e 6b 73 0d 01 04 0f f2 | 75 70 64 61 74 65 54 69 |nks.....|updateTi|
|00000230| 6d 65 0d 01 0e 0a f2 69 | 6e 74 72 6f 0d 01 18 0e |me.....i|ntro....|
|00000240| f2 71 75 61 64 42 75 69 | 6c 64 0d 01 22 0e f2 75 |.quadBui|ld.."..u|
|00000250| 70 64 61 74 65 50 6f 73 | 0d 01 2c 13 f2 73 68 6f |pdatePos|..,..sho|
|00000260| 72 74 52 61 6e 67 65 53 | 63 61 6e 0d 01 36 05 f5 |rtRangeS|can..6..|
|00000270| 0d 01 40 17 ff 20 22 46 | 58 20 32 31 20 39 22 20 |..@.. "F|X 21 9" |
|00000280| 3a 20 56 25 2b 3d 31 0d | 01 4a 0e f2 63 6f 6e 64 |: V%+=1.|.J..cond|
|00000290| 69 74 69 6f 6e 0d 01 54 | 0c f2 63 6f 6d 6d 61 6e |ition..T|..comman|
|000002a0| 64 0d 01 5e 0c e7 20 44 | 25 3d 30 20 8c 0d 01 68 |d..^.. D|%=0 ...h|
|000002b0| 11 20 20 20 20 20 3a 20 | 5a 3d b3 28 31 29 0d 01 |.     : |Z=.(1)..|
|000002c0| 72 30 20 20 20 20 20 3a | 20 e7 20 5a 3e 2e 39 39 |r0     :| . Z>.99|
|000002d0| 38 20 80 20 4e 45 55 25 | 3d a3 20 8c 20 f2 6e 65 |8 . NEU%|=. . .ne|
|000002e0| 75 74 72 6f 6e 20 3a 20 | e5 20 8d 74 64 41 0d 01 |utron : |. .tdA..|
|000002f0| 7c 32 20 20 20 20 20 3a | 20 e7 20 5a 3e 2e 39 39 ||2     :| . Z>.99|
|00000300| 36 20 80 20 44 49 4c 25 | 3d a3 20 8c 20 f2 64 69 |6 . DIL%|=. . .di|
|00000310| 6c 69 74 68 69 75 6d 20 | 3a 20 e5 20 8d 74 64 41 |lithium |: . .tdA|
|00000320| 0d 01 86 2f 20 20 20 20 | 20 3a 20 e7 20 5a 3e 2e |.../    | : . Z>.|
|00000330| 39 39 20 80 20 4d 59 53 | 25 3d a3 20 8c 20 f2 6d |99 . MYS|%=. . .m|
|00000340| 79 73 74 65 72 79 20 3a | 20 e5 20 8d 74 64 41 0d |ystery :| . .tdA.|
|00000350| 01 90 24 20 20 20 20 20 | 3a 20 e7 20 5a 3e 30 2e |..$     |: . Z>0.|
|00000360| 39 38 20 8c 20 f2 6e 6f | 76 61 20 3a 20 e5 20 8d |98 . .no|va : . .|
|00000370| 74 64 41 0d 01 9a 28 20 | 20 20 20 20 3a 20 e7 20 |tdA...( |    : . |
|00000380| 5a 3c 2e 35 20 80 20 56 | 25 3e 5a 25 20 8c 20 f2 |Z<.5 . V|%>Z% . .|
|00000390| 70 72 6f 62 65 52 65 74 | 75 72 6e 0d 01 a4 05 cd |probeRet|urn.....|
|000003a0| 0d 01 ae 24 e7 20 45 3c | 31 20 80 20 53 3c 31 20 |...$. E<|1 . S<1 |
|000003b0| 80 20 ac 20 44 65 61 64 | 25 20 8c 20 f2 64 65 61 |. . Dead|% . .dea|
|000003c0| 64 28 31 29 0d 01 b8 0f | e7 20 53 3c 31 20 8c 20 |d(1)....|. S<1 . |
|000003d0| 53 3d 30 0d 01 c2 0b fd | 20 44 65 61 64 25 0d 01 |S=0.....| Dead%..|
|000003e0| cc 07 fd 20 a3 0d 01 d6 | 05 e0 0d 01 e0 05 3a 0d |... ....|......:.|
|000003f0| 01 ea 10 dd 20 f2 71 75 | 61 64 42 75 69 6c 64 0d |.... .qu|adBuild.|
|00000400| 01 f4 26 58 3d 47 28 51 | 31 2c 51 32 29 2a 2e 30 |..&X=G(Q|1,Q2)*.0|
|00000410| 31 20 3a 20 5a 28 51 31 | 2c 51 32 29 3d 47 28 51 |1 : Z(Q1|,Q2)=G(Q|
|00000420| 31 2c 51 32 29 0d 01 fe | 1d 4b 33 3d a8 28 58 29 |1,Q2)...|.K3=.(X)|
|00000430| 20 3a 20 42 33 3d a8 28 | 28 58 2d 4b 33 29 2a 31 | : B3=.(|(X-K3)*1|
|00000440| 30 29 0d 02 08 21 53 33 | 3d 47 28 51 31 2c 51 32 |0)...!S3|=G(Q1,Q2|
|00000450| 29 2d a8 28 47 28 51 31 | 2c 51 32 29 2a 2e 31 29 |)-.(G(Q1|,Q2)*.1)|
|00000460| 2a 31 30 0d 02 12 40 51 | 24 28 29 3d 22 22 20 3a |*10...@Q|$()="" :|
|00000470| 20 e3 20 49 25 3d 31 20 | b8 20 33 20 3a 20 4b 28 | . I%=1 |. 3 : K(|
|00000480| 49 25 2c 31 29 3d 30 20 | 3a 20 4b 28 49 25 2c 32 |I%,1)=0 |: K(I%,2|
|00000490| 29 3d 30 20 3a 20 4b 28 | 49 25 2c 33 29 3d 30 20 |)=0 : K(|I%,3)=0 |
|000004a0| 3a 20 ed 0d 02 1c 1a 51 | 24 28 53 31 2c 53 32 29 |: .....Q|$(S1,S2)|
|000004b0| 3d 22 65 6e 74 65 72 70 | 72 69 73 65 22 0d 02 26 |="enterp|rise"..&|
|000004c0| 0c e7 20 4b 33 3e 30 20 | 8c 0d 02 30 16 20 20 20 |.. K3>0 |...0.   |
|000004d0| 20 20 3a 20 e3 20 49 25 | 3d 31 20 b8 20 4b 33 0d |  : . I%|=1 . K3.|
|000004e0| 02 3a 25 20 20 20 20 20 | 3a 20 f2 72 6e 64 20 3a |.:%     |: .rnd :|
|000004f0| 20 51 24 28 52 31 2c 52 | 32 29 3d 22 6b 6c 69 6e | Q$(R1,R|2)="klin|
|00000500| 67 6f 6e 22 0d 02 44 35 | 20 20 20 20 20 3a 20 4b |gon"..D5|     : K|
|00000510| 28 49 25 2c 31 29 3d 52 | 31 20 3a 20 4b 28 49 25 |(I%,1)=R|1 : K(I%|
|00000520| 2c 32 29 3d 52 32 20 3a | 20 4b 28 49 25 2c 33 29 |,2)=R2 :| K(I%,3)|
|00000530| 3d 53 39 2b b3 28 33 35 | 29 0d 02 4e 0c 20 20 20 |=S9+.(35|)..N.   |
|00000540| 20 20 3a 20 ed 0d 02 58 | 05 cd 0d 02 62 0c e7 20 |  : ...X|....b.. |
|00000550| 42 33 3e 30 20 8c 0d 02 | 6c 26 20 20 20 20 20 3a |B3>0 ...|l&     :|
|00000560| 20 f2 72 6e 64 20 3a 20 | 51 24 28 52 31 2c 52 32 | .rnd : |Q$(R1,R2|
|00000570| 29 3d 22 73 74 61 72 62 | 61 73 65 22 0d 02 76 05 |)="starb|ase"..v.|
|00000580| cd 0d 02 80 0c e7 20 53 | 33 3e 30 20 8c 0d 02 8a |...... S|3>0 ....|
|00000590| 16 20 20 20 20 20 3a 20 | e3 20 49 25 3d 31 20 b8 |.     : |. I%=1 .|
|000005a0| 20 53 33 0d 02 94 22 20 | 20 20 20 20 3a 20 f2 72 | S3..." |    : .r|
|000005b0| 6e 64 20 3a 20 51 24 28 | 52 31 2c 52 32 29 3d 22 |nd : Q$(|R1,R2)="|
|000005c0| 73 74 61 72 22 0d 02 9e | 0c 20 20 20 20 20 3a 20 |star"...|.     : |
|000005d0| ed 0d 02 a8 05 cd 0d 02 | b2 0e f2 62 61 73 65 43 |........|...baseC|
|000005e0| 68 65 63 6b 0d 02 bc 05 | e1 0d 02 c6 05 3a 0d 02 |heck....|.....:..|
|000005f0| d0 0e dd 20 f2 63 6f 6d | 6d 61 6e 64 0d 02 da 14 |... .com|mand....|
|00000600| 4c 25 3d 30 20 3a 20 4c | 25 3d a4 6d 6f 75 73 65 |L%=0 : L|%=.mouse|
|00000610| 0d 02 e4 05 3a 0d 02 ee | 0b c8 8e 20 4c 25 20 ca |....:...|... L% .|
|00000620| 0d 02 f8 27 c9 20 30 20 | 20 3a 20 f2 63 6c 65 61 |...'. 0 | : .clea|
|00000630| 72 28 33 29 20 3a 20 f2 | 63 6f 6d 6d 61 6e 64 49 |r(3) : .|commandI|
|00000640| 6e 66 6f 20 3a 20 e1 0d | 03 02 18 c9 20 31 20 20 |nfo : ..|.... 1  |
|00000650| 3a 20 f2 64 61 6d 61 67 | 65 52 65 70 6f 72 74 0d |: .damag|eReport.|
|00000660| 03 0c 18 c9 20 32 20 20 | 3a 20 f2 73 74 61 74 75 |.... 2  |: .statu|
|00000670| 73 52 65 70 6f 72 74 0d | 03 16 14 c9 20 33 20 20 |sReport.|.... 3  |
|00000680| 3a 20 f2 69 6e 73 74 72 | 75 63 74 0d 03 20 1a c9 |: .instr|uct.. ..|
|00000690| 20 34 20 20 3a 20 f2 73 | 68 6f 72 74 52 61 6e 67 | 4  : .s|hortRang|
|000006a0| 65 53 63 61 6e 0d 03 2a | 17 c9 20 35 20 20 3a 20 |eScan..*|.. 5  : |
|000006b0| f2 63 6f 6d 70 75 74 65 | 72 4d 61 70 0d 03 34 19 |.compute|rMap..4.|
|000006c0| c9 20 36 20 20 3a 20 f2 | 6c 6f 6e 67 52 61 6e 67 |. 6  : .|longRang|
|000006d0| 65 53 63 61 6e 0d 03 3e | 16 c9 20 37 20 20 3a 20 |eScan..>|.. 7  : |
|000006e0| f2 68 79 70 65 72 50 72 | 6f 62 65 0d 03 48 13 c9 |.hyperPr|obe..H..|
|000006f0| 20 38 20 20 3a 20 f2 70 | 68 61 73 6f 72 73 0d 03 | 8  : .p|hasors..|
|00000700| 52 17 c9 20 39 20 20 3a | 20 f2 73 63 61 6e 6e 65 |R.. 9  :| .scanne|
|00000710| 72 49 6e 66 6f 0d 03 5c | 15 c9 20 31 30 20 3a 20 |rInfo..\|.. 10 : |
|00000720| f2 74 6f 72 70 65 64 6f | 65 73 0d 03 66 15 c9 20 |.torpedo|es..f.. |
|00000730| 31 31 20 3a 20 f2 70 68 | 6f 74 6f 6e 41 69 6d 0d |11 : .ph|otonAim.|
|00000740| 03 70 15 c9 20 31 32 20 | 3a 20 f2 64 65 66 6c 65 |.p.. 12 |: .defle|
|00000750| 63 74 6f 72 0d 03 7a 16 | c9 20 31 33 20 3a 20 f2 |ctor..z.|. 13 : .|
|00000760| 6e 61 76 69 67 61 74 69 | 6f 6e 0d 03 84 1c c9 20 |navigati|on..... |
|00000770| 31 34 20 3a 20 f2 63 6f | 75 72 73 65 43 61 6c 63 |14 : .co|urseCalc|
|00000780| 75 6c 61 74 6f 72 0d 03 | 8e 05 cb 0d 03 98 0f e7 |ulator..|........|
|00000790| 20 44 65 61 64 25 20 8c | 20 e1 0d 03 a2 1d e7 20 | Dead% .| ...... |
|000007a0| 4b 33 3e 30 20 80 20 b3 | 28 32 29 3d 31 20 8c 20 |K3>0 . .|(2)=1 . |
|000007b0| f2 61 74 74 61 63 6b 0d | 03 ac 0f e7 20 44 65 61 |.attack.|.... Dea|
|000007c0| 64 25 20 8c 20 e1 0d 03 | b6 18 e7 20 56 25 20 83 |d% . ...|... V% .|
|000007d0| 20 34 3d 30 20 8c 20 f2 | 72 65 70 6f 72 74 0d 03 | 4=0 . .|report..|
|000007e0| c0 05 e1 0d 03 ca 05 3a | 0d 03 d4 0c dd 20 a4 6d |.......:|..... .m|
|000007f0| 6f 75 73 65 0d 03 de 0d | ea 20 78 2c 79 2c 62 75 |ouse....|. x,y,bu|
|00000800| 74 0d 03 e8 1a f5 20 3a | 20 c8 97 20 78 2c 79 2c |t..... :| .. x,y,|
|00000810| 62 75 74 20 3a 20 fd 20 | 62 75 74 0d 03 f2 15 e7 |but : . |but.....|
|00000820| 20 79 3e 31 31 36 20 80 | 20 79 3c 32 31 36 20 8c | y>116 .| y<216 .|
|00000830| 0d 03 fc 18 e7 20 78 3e | 32 34 20 80 20 78 3c 39 |..... x>|24 . x<9|
|00000840| 36 20 8c 20 4c 25 3d 31 | 0d 04 06 19 e7 20 78 3e |6 . L%=1|..... x>|
|00000850| 39 36 20 80 20 78 3c 31 | 36 38 20 8c 20 4c 25 3d |96 . x<1|68 . L%=|
|00000860| 32 0d 04 10 1a e7 20 78 | 3e 31 36 38 20 80 20 78 |2..... x|>168 . x|
|00000870| 3c 32 35 30 20 8c 20 4c | 25 3d 33 0d 04 1a 05 cd |<250 . L|%=3.....|
|00000880| 0d 04 24 15 e7 20 79 3e | 32 34 38 20 80 20 79 3c |..$.. y>|248 . y<|
|00000890| 33 31 36 20 8c 0d 04 2e | 1a e7 20 78 3e 32 38 38 |316 ....|.. x>288|
|000008a0| 20 80 20 78 3c 33 36 30 | 20 8c 20 4c 25 3d 34 0d | . x<360| . L%=4.|
|000008b0| 04 38 1a e7 20 78 3e 33 | 36 30 20 80 20 78 3c 34 |.8.. x>3|60 . x<4|
|000008c0| 33 32 20 8c 20 4c 25 3d | 35 0d 04 42 1a e7 20 78 |32 . L%=|5..B.. x|
|000008d0| 3e 34 33 32 20 80 20 78 | 3c 35 30 34 20 8c 20 4c |>432 . x|<504 . L|
|000008e0| 25 3d 36 0d 04 4c 1a e7 | 20 78 3e 35 30 34 20 80 |%=6..L..| x>504 .|
|000008f0| 20 78 3c 35 37 36 20 8c | 20 4c 25 3d 37 0d 04 56 | x<576 .| L%=7..V|
|00000900| 1a e7 20 78 3e 36 31 36 | 20 80 20 78 3c 36 38 38 |.. x>616| . x<688|
|00000910| 20 8c 20 4c 25 3d 38 0d | 04 60 1a e7 20 78 3e 36 | . L%=8.|.`.. x>6|
|00000920| 39 36 20 80 20 78 3c 37 | 36 38 20 8c 20 4c 25 3d |96 . x<7|68 . L%=|
|00000930| 39 0d 04 6a 1b e7 20 78 | 3e 37 37 36 20 80 20 78 |9..j.. x|>776 . x|
|00000940| 3c 38 34 38 20 8c 20 4c | 25 3d 31 30 0d 04 74 1b |<848 . L|%=10..t.|
|00000950| e7 20 78 3e 38 35 36 20 | 80 20 78 3c 39 32 38 20 |. x>856 |. x<928 |
|00000960| 8c 20 4c 25 3d 31 31 0d | 04 7e 1c e7 20 78 3e 39 |. L%=11.|.~.. x>9|
|00000970| 33 36 20 80 20 78 3c 31 | 30 30 38 20 8c 20 4c 25 |36 . x<1|008 . L%|
|00000980| 3d 31 32 0d 04 88 1d e7 | 20 78 3e 31 30 36 38 20 |=12.....| x>1068 |
|00000990| 80 20 78 3c 31 31 34 30 | 20 8c 20 4c 25 3d 31 33 |. x<1140| . L%=13|
|000009a0| 0d 04 92 1d e7 20 78 3e | 31 31 38 38 20 80 20 78 |..... x>|1188 . x|
|000009b0| 3c 31 32 36 30 20 8c 20 | 4c 25 3d 31 34 0d 04 9c |<1260 . |L%=14...|
|000009c0| 05 cd 0d 04 a6 07 3d 4c | 25 0d 04 b0 05 3a 0d 04 |......=L|%....:..|
|000009d0| ba 11 dd 20 f2 6e 61 76 | 69 67 61 74 69 6f 6e 0d |... .nav|igation.|
|000009e0| 04 c4 0d f2 63 6c 65 61 | 72 28 35 29 0d 04 ce 0f |....clea|r(5)....|
|000009f0| e7 20 44 28 31 30 29 3c | 30 20 8c 0d 04 d8 26 20 |. D(10)<|0 ....& |
|00000a00| 20 20 20 20 3a 20 f2 66 | 6f 6e 74 28 31 30 38 34 |    : .f|ont(1084|
|00000a10| 2c 32 32 38 2c 31 2c 22 | 4e 41 56 43 4f 4d 50 22 |,228,1,"|NAVCOMP"|
|00000a20| 29 0d 04 e2 27 20 20 20 | 20 20 3a 20 f2 66 6f 6e |)...'   |  : .fon|
|00000a30| 74 28 31 30 38 34 2c 31 | 39 32 2c 31 2c 22 44 49 |t(1084,1|92,1,"DI|
|00000a40| 53 41 42 4c 45 44 22 29 | 0d 04 ec 0c 20 20 20 20 |SABLED")|....    |
|00000a50| 20 3a 20 e1 0d 04 f6 05 | cd 0d 05 00 0e e7 20 44 | : .....|...... D|
|00000a60| 28 37 29 3c 30 20 8c 0d | 05 0a 46 20 20 20 20 20 |(7)<0 ..|..F     |
|00000a70| 3a 20 f2 70 72 69 6e 74 | 65 72 28 32 2c 22 52 22 |: .print|er(2,"R"|
|00000a80| 2c 22 57 41 52 50 20 44 | 52 49 56 45 20 44 49 53 |,"WARP D|RIVE DIS|
|00000a90| 41 42 4c 45 44 20 2e 2e | 2e 20 4d 41 58 20 49 4d |ABLED ..|. MAX IM|
|00000aa0| 50 55 4c 53 45 20 2d 20 | 30 2e 32 22 29 0d 05 14 |PULSE - |0.2")...|
|00000ab0| 05 cd 0d 05 1e 1f f2 66 | 6f 6e 74 28 31 30 38 34 |.......f|ont(1084|
|00000ac0| 2c 32 32 38 2c 38 2c 22 | 48 45 41 44 49 4e 47 22 |,228,8,"|HEADING"|
|00000ad0| 29 0d 05 28 34 43 31 3d | a4 69 6e 70 75 74 28 31 |)..(4C1=|.input(1|
|00000ae0| 30 38 34 2c 31 39 32 2c | 31 31 30 30 2c 31 39 32 |084,192,|1100,192|
|00000af0| 2c 33 2c 22 3a 22 2c 34 | 29 20 3a 20 f2 63 6c 65 |,3,":",4|) : .cle|
|00000b00| 61 72 28 35 29 0d 05 32 | 1c f2 66 6f 6e 74 28 31 |ar(5)..2|..font(1|
|00000b10| 30 38 34 2c 32 32 38 2c | 38 2c 22 57 41 52 50 22 |084,228,|8,"WARP"|
|00000b20| 29 0d 05 3c 34 57 31 3d | a4 69 6e 70 75 74 28 31 |)..<4W1=|.input(1|
|00000b30| 30 38 34 2c 31 39 32 2c | 31 31 30 30 2c 31 39 32 |084,192,|1100,192|
|00000b40| 2c 33 2c 22 3a 22 2c 34 | 29 20 3a 20 f2 63 6c 65 |,3,":",4|) : .cle|
|00000b50| 61 72 28 35 29 0d 05 46 | 1d e7 20 44 28 37 29 3c |ar(5)..F|.. D(7)<|
|00000b60| 30 20 80 20 57 31 3e 2e | 32 20 8c 20 e5 20 8d 64 |0 . W1>.|2 . . .d|
|00000b70| 44 44 0d 05 50 1b 43 31 | 3d 43 31 2b 31 20 3a 20 |DD..P.C1|=C1+1 : |
|00000b80| e7 20 43 31 3d 39 20 8c | 20 43 31 3d 31 0d 05 5a |. C1=9 .| C1=1..Z|
|00000b90| 22 e7 20 43 31 3e 39 20 | 84 20 43 31 3c 31 20 84 |". C1>9 |. C1<1 .|
|00000ba0| 20 57 31 3e 38 20 84 20 | 57 31 3c 2e 31 20 8c 0d | W1>8 . |W1<.1 ..|
|00000bb0| 05 64 18 20 20 20 20 20 | 3a 20 f2 63 6c 65 61 72 |.d.     |: .clear|
|00000bc0| 28 35 29 20 3a 20 e1 0d | 05 6e 05 cd 0d 05 78 14 |(5) : ..|.n....x.|
|00000bd0| e7 20 44 25 3d 31 20 80 | 20 57 31 3e 2e 39 20 8c |. D%=1 .| W1>.9 .|
|00000be0| 0d 05 82 35 20 20 20 20 | 20 3a 20 f2 70 72 69 6e |...5    | : .prin|
|00000bf0| 74 65 72 28 31 2c 22 42 | 22 2c 22 44 4f 43 4b 45 |ter(1,"B|","DOCKE|
|00000c00| 44 20 41 54 20 53 54 41 | 52 42 41 53 45 20 2e 2e |D AT STA|RBASE ..|
|00000c10| 2e 2e 2e 22 29 0d 05 8c | 42 20 20 20 20 20 3a 20 |...")...|B     : |
|00000c20| f2 70 72 69 6e 74 65 72 | 28 32 2c 22 59 22 2c 22 |.printer|(2,"Y","|
|00000c30| 4e 4f 20 57 41 52 50 20 | 41 56 41 49 4c 41 42 4c |NO WARP |AVAILABL|
|00000c40| 45 20 57 48 49 4c 53 54 | 20 44 4f 43 4b 45 44 20 |E WHILST| DOCKED |
|00000c50| 2e 2e 2e 2e 2e 22 29 0d | 05 96 11 20 20 20 20 20 |.....").|...     |
|00000c60| 3a 20 e5 20 8d 64 44 44 | 0d 05 a0 05 cd 0d 05 aa |: . .dDD|........|
|00000c70| 15 4e 3d a8 28 28 57 31 | 2b 2e 30 36 32 35 29 2a |.N=.((W1|+.0625)*|
|00000c80| 38 29 0d 05 b4 0d e7 20 | 45 2d 4e 3c 31 20 8c 0d |8)..... |E-N<1 ..|
|00000c90| 05 be 3f 20 20 20 20 20 | 3a 20 f2 70 72 69 6e 74 |..?     |: .print|
|00000ca0| 65 72 28 32 2c 22 52 22 | 2c 22 49 4e 53 55 46 46 |er(2,"R"|,"INSUFF|
|00000cb0| 49 43 49 45 4e 54 20 45 | 4e 45 52 47 59 20 46 4f |ICIENT E|NERGY FO|
|00000cc0| 52 20 57 41 52 50 20 2e | 2e 2e 2e 2e 22 29 0d 05 |R WARP .|....")..|
|00000cd0| c8 1a 20 20 20 20 20 3a | 20 e7 20 45 3c 3d 30 20 |..     :| . E<=0 |
|00000ce0| 80 20 53 3c 3d 30 20 8c | 0d 05 d2 20 20 20 20 20 |. S<=0 .|...     |
|00000cf0| 20 3a 20 f2 73 70 61 63 | 65 20 3a 20 f2 64 65 61 | : .spac|e : .dea|
|00000d00| 64 28 31 29 20 3a 20 e1 | 0d 05 dc 2a cc 20 3a 20 |d(1) : .|...*. : |
|00000d10| f2 73 70 61 63 65 20 3a | 20 f2 63 6c 65 61 72 28 |.space :| .clear(|
|00000d20| 35 29 20 3a 20 f2 63 6c | 65 61 72 28 36 29 20 3a |5) : .cl|ear(6) :|
|00000d30| 20 e1 0d 05 e6 05 cd 0d | 05 f0 05 cd 0d 05 fa 24 | .......|.......$|
|00000d40| 51 24 28 53 31 2c 53 32 | 29 3d 22 22 20 3a 20 58 |Q$(S1,S2|)="" : X|
|00000d50| 3d 53 31 20 3a 20 59 3d | 53 32 20 3a 20 f2 58 59 |=S1 : Y=|S2 : .XY|
|00000d60| 0d 06 04 0d e7 20 57 31 | 3e 3d 31 20 8c 0d 06 0e |..... W1|>=1 ....|
|00000d70| 39 20 20 20 20 20 3a 20 | f2 70 72 69 6e 74 65 72 |9     : |.printer|
|00000d80| 28 32 2c 22 47 22 2c 22 | 57 41 52 50 20 45 4e 47 |(2,"G","|WARP ENG|
|00000d90| 49 4e 45 53 20 41 43 54 | 49 56 41 54 45 44 20 2e |INES ACT|IVATED .|
|00000da0| 2e 2e 2e 2e 22 29 0d 06 | 18 05 cd 0d 06 22 10 f2 |....")..|....."..|
|00000db0| 75 70 64 61 74 65 42 61 | 6e 6b 73 0d 06 2c 0c 49 |updateBa|nks..,.I|
|00000dc0| 25 3d 30 20 3a 20 f5 0d | 06 36 17 53 31 3d 53 31 |%=0 : ..|.6.S1=S1|
|00000dd0| 2b 58 31 20 3a 20 53 32 | 3d 53 32 2b 58 32 0d 06 |+X1 : S2|=S2+X2..|
|00000de0| 40 21 e7 20 53 31 3c 31 | 20 84 20 53 31 3e 38 20 |@!. S1<1| . S1>8 |
|00000df0| 84 20 53 32 3c 31 20 84 | 20 53 32 3e 38 20 8c 0d |. S2<1 .| S2>8 ..|
|00000e00| 06 4a 28 20 20 20 20 20 | 3a 20 58 3d 51 31 2a 38 |.J(     |: X=Q1*8|
|00000e10| 2b 58 2b 58 31 2a 4e 20 | 3a 20 59 3d 51 32 2a 38 |+X+X1*N |: Y=Q2*8|
|00000e20| 2b 59 2b 58 32 2a 4e 0d | 06 54 20 20 20 20 20 20 |+Y+X2*N.|.T      |
|00000e30| 3a 20 51 31 3d a8 28 58 | 2f 38 29 20 3a 20 51 32 |: Q1=.(X|/8) : Q2|
|00000e40| 3d a8 28 59 2f 38 29 0d | 06 5e 26 20 20 20 20 20 |=.(Y/8).|.^&     |
|00000e50| 3a 20 53 31 3d a8 28 58 | 2d 51 31 2a 38 29 20 3a |: S1=.(X|-Q1*8) :|
|00000e60| 20 53 32 3d a8 28 59 2d | 51 32 2a 38 29 0d 06 68 | S2=.(Y-|Q2*8)..h|
|00000e70| 22 20 20 20 20 20 3a 20 | e7 20 53 31 3d 30 20 8c |"     : |. S1=0 .|
|00000e80| 20 51 31 3d 51 31 2d 31 | 20 3a 20 53 31 3d 38 0d | Q1=Q1-1| : S1=8.|
|00000e90| 06 72 22 20 20 20 20 20 | 3a 20 e7 20 53 32 3d 30 |.r"     |: . S2=0|
|00000ea0| 20 8c 20 51 32 3d 51 32 | 2d 31 20 3a 20 53 32 3d | . Q2=Q2|-1 : S2=|
|00000eb0| 38 0d 06 7c 1a 20 20 20 | 20 20 3a 20 54 3d 54 2b |8..|.   |  : T=T+|
|00000ec0| 31 20 3a 20 45 3d 45 2d | 4e 2b 35 0d 06 86 20 20 |1 : E=E-|N+5...  |
|00000ed0| 20 20 20 20 3a 20 e7 20 | 54 3e 54 38 20 8c 20 f2 |    : . |T>T8 . .|
|00000ee0| 64 65 61 64 28 32 29 20 | 3a 20 e1 0d 06 90 1b 20 |dead(2) |: ..... |
|00000ef0| 20 20 20 20 3a 20 f2 6e | 65 77 51 75 61 64 72 61 |    : .n|ewQuadra|
|00000f00| 6e 74 20 3a 20 e1 0d 06 | 9a 05 cd 0d 06 a4 14 e7 |nt : ...|........|
|00000f10| 20 51 24 28 53 31 2c 53 | 32 29 3d 22 22 20 8c 0d | Q$(S1,S|2)="" ..|
|00000f20| 06 ae 1c 20 20 20 20 20 | 3a 20 49 25 3d 49 25 2b |...     |: I%=I%+|
|00000f30| 31 20 3a 20 fd 20 49 25 | 3e 3d 4e 0d 06 b8 2d cc |1 : . I%|>=N...-.|
|00000f40| 20 3a 20 53 31 3d a8 28 | 53 31 2d 58 31 29 20 3a | : S1=.(|S1-X1) :|
|00000f50| 20 53 32 3d a8 28 53 32 | 2d 58 32 29 20 3a 20 f2 | S2=.(S2|-X2) : .|
|00000f60| 63 6c 65 61 72 28 33 29 | 0d 06 c2 13 20 20 20 20 |clear(3)|....    |
|00000f70| 20 3a 20 e7 20 57 31 3c | 31 20 8c 0d 06 cc 37 20 | : . W1<|1 ....7 |
|00000f80| 20 20 20 20 3a 20 f2 74 | 65 78 74 28 33 30 38 2c |    : .t|ext(308,|
|00000f90| 36 30 38 2c 22 52 22 2c | 22 49 4d 50 55 4c 53 45 |608,"R",|"IMPULSE|
|00000fa0| 20 44 52 49 56 45 20 53 | 48 55 54 20 44 4f 57 4e | DRIVE S|HUT DOWN|
|00000fb0| 22 29 0d 06 d6 33 cc 20 | 3a 20 f2 74 65 78 74 28 |")...3. |: .text(|
|00000fc0| 33 30 38 2c 36 30 38 2c | 22 52 22 2c 22 57 41 52 |308,608,|"R","WAR|
|00000fd0| 50 20 45 4e 47 49 4e 45 | 53 20 53 48 55 54 20 44 |P ENGINE|S SHUT D|
|00000fe0| 4f 57 4e 22 29 0d 06 e0 | 05 cd 0d 06 ea 48 20 20 |OWN")...|.....H  |
|00000ff0| 20 20 20 3a 20 f2 74 65 | 78 74 28 33 30 38 2c 35 |   : .te|xt(308,5|
|00001000| 35 36 2c 22 52 22 2c 22 | 41 54 20 53 45 43 54 4f |56,"R","|AT SECTO|
|00001010| 52 20 22 2b c3 28 53 32 | 29 2b 22 2e 22 2b c3 28 |R "+.(S2|)+"."+.(|
|00001020| 53 31 29 2b 22 20 44 55 | 45 20 54 4f 20 42 41 44 |S1)+" DU|E TO BAD|
|00001030| 22 29 0d 06 f4 3b 20 20 | 20 20 20 3a 20 f2 74 65 |")...;  |   : .te|
|00001040| 78 74 28 33 30 38 2c 35 | 30 34 2c 22 52 22 2c 22 |xt(308,5|04,"R","|
|00001050| 4e 41 56 49 47 41 54 49 | 4f 4e 20 2e 2e 2e 2e 2e |NAVIGATI|ON .....|
|00001060| 22 29 20 3a 20 57 3d a6 | 28 32 30 30 29 0d 06 fe |") : W=.|(200)...|
|00001070| 05 cd 0d 07 08 36 53 31 | 3d a8 28 53 31 2b 2e 35 |.....6S1|=.(S1+.5|
|00001080| 29 20 3a 20 53 32 3d a8 | 28 53 32 2b 2e 35 29 20 |) : S2=.|(S2+.5) |
|00001090| 3a 20 51 24 28 53 31 2c | 53 32 29 3d 22 65 6e 74 |: Q$(S1,|S2)="ent|
|000010a0| 65 72 70 72 69 73 65 22 | 0d 07 12 2e 45 3d 45 2d |erprise"|....E=E-|
|000010b0| 4e 20 3a 20 54 3d 28 a8 | 28 31 30 2a 54 2b 31 2e |N : T=(.|(10*T+1.|
|000010c0| 31 29 29 2f 31 30 20 3a | 20 e7 20 57 31 3c 31 20 |1))/10 :| . W1<1 |
|000010d0| 8c 20 8d 54 66 47 0d 07 | 1c 14 54 3d 28 a8 28 31 |. .TfG..|..T=(.(1|
|000010e0| 30 2a 54 2b 39 29 29 2f | 31 30 0d 07 26 18 e7 20 |0*T+9))/|10..&.. |
|000010f0| 54 3e 54 30 2b 54 39 20 | 8c 20 f2 64 65 61 64 28 |T>T0+T9 |. .dead(|
|00001100| 32 29 0d 07 30 20 f2 62 | 61 73 65 43 68 65 63 6b |2)..0 .b|aseCheck|
|00001110| 20 3a 20 f2 73 68 6f 72 | 74 52 61 6e 67 65 53 63 | : .shor|tRangeSc|
|00001120| 61 6e 0d 07 3a 19 f2 63 | 6c 65 61 72 28 35 29 20 |an..:..c|lear(5) |
|00001130| 3a 20 f2 63 6c 65 61 72 | 28 36 29 0d 07 44 05 e1 |: .clear|(6)..D..|
|00001140| 0d 07 4e 05 3a 0d 07 58 | 12 dd 20 f2 6e 65 77 51 |..N.:..X|.. .newQ|
|00001150| 75 61 64 72 61 6e 74 0d | 07 62 19 f2 63 6c 65 61 |uadrant.|.b..clea|
|00001160| 72 28 31 29 20 3a 20 f2 | 63 6c 65 61 72 28 36 29 |r(1) : .|clear(6)|
|00001170| 0d 07 6c 60 f2 70 72 69 | 6e 74 65 72 28 31 2c 22 |..l`.pri|nter(1,"|
|00001180| 57 22 2c 22 4e 4f 57 20 | 45 4e 54 45 52 49 4e 47 |W","NOW |ENTERING|
|00001190| 20 51 55 41 44 52 41 4e | 54 20 22 2b c3 28 51 32 | QUADRAN|T "+.(Q2|
|000011a0| 29 2b 22 2e 22 2b c3 28 | 51 31 29 2b 22 20 53 45 |)+"."+.(|Q1)+" SE|
|000011b0| 43 54 4f 52 20 22 2b c3 | 28 53 32 29 2b 22 2e 22 |CTOR "+.|(S2)+"."|
|000011c0| 2b c3 28 53 31 29 2b 22 | 20 2e 2e 2e 2e 2e 22 29 |+.(S1)+"| .....")|
|000011d0| 0d 07 76 21 e7 20 51 31 | 3c 31 20 84 20 51 31 3e |..v!. Q1|<1 . Q1>|
|000011e0| 38 20 84 20 51 32 3c 31 | 20 84 20 51 32 3e 38 20 |8 . Q2<1| . Q2>8 |
|000011f0| 8c 0d 07 80 14 20 20 20 | 20 20 3a 20 f2 63 6c 65 |.....   |  : .cle|
|00001200| 61 72 28 36 29 0d 07 8a | 18 20 20 20 20 20 3a 20 |ar(6)...|.     : |
|00001210| e7 20 51 31 3e 39 20 8c | 20 51 31 3d 39 0d 07 94 |. Q1>9 .| Q1=9...|
|00001220| 18 20 20 20 20 20 3a 20 | e7 20 51 32 3e 39 20 8c |.     : |. Q2>9 .|
|00001230| 20 51 32 3d 39 0d 07 9e | 18 20 20 20 20 20 3a 20 | Q2=9...|.     : |
|00001240| e7 20 51 31 3c 30 20 8c | 20 51 31 3d 30 0d 07 a8 |. Q1<0 .| Q1=0...|
|00001250| 18 20 20 20 20 20 3a 20 | e7 20 51 32 3c 30 20 8c |.     : |. Q2<0 .|
|00001260| 20 51 32 3d 30 0d 07 b2 | 47 20 20 20 20 20 3a 20 | Q2=0...|G     : |
|00001270| f2 70 72 69 6e 74 65 72 | 28 32 2c 22 59 22 2c 22 |.printer|(2,"Y","|
|00001280| 59 4f 55 20 48 41 56 45 | 20 53 54 52 41 59 45 44 |YOU HAVE| STRAYED|
|00001290| 20 4f 55 54 53 49 44 45 | 20 4f 50 45 52 41 54 49 | OUTSIDE| OPERATI|
|000012a0| 4f 4e 53 20 52 45 47 49 | 4f 4e 22 29 0d 07 bc 3b |ONS REGI|ON")...;|
|000012b0| 20 20 20 20 20 3a 20 57 | 3d a6 28 38 30 29 20 3a |     : W|=.(80) :|
|000012c0| 20 f2 70 72 69 6e 74 65 | 72 28 32 2c 22 59 22 2c | .printe|r(2,"Y",|
|000012d0| 22 4e 4f 20 43 48 41 52 | 54 53 20 48 45 4c 44 20 |"NO CHAR|TS HELD |
|000012e0| 2e 2e 2e 2e 2e 22 29 0d | 07 c6 05 cd 0d 07 d0 1b |.....").|........|
|000012f0| f2 71 75 61 64 42 75 69 | 6c 64 20 3a 20 f2 62 61 |.quadBui|ld : .ba|
|00001300| 73 65 43 68 65 63 6b 0d | 07 da 38 f2 73 68 6f 72 |seCheck.|..8.shor|
|00001310| 74 52 61 6e 67 65 53 63 | 61 6e 20 3a 20 f2 75 70 |tRangeSc|an : .up|
|00001320| 64 61 74 65 50 6f 73 20 | 3a 20 f2 63 6c 65 61 72 |datePos |: .clear|
|00001330| 28 31 29 20 3a 20 f2 63 | 6c 65 61 72 28 36 29 0d |(1) : .c|lear(6).|
|00001340| 07 e4 1e e7 20 47 28 51 | 31 2c 51 32 29 3d 2d 31 |.... G(Q|1,Q2)=-1|
|00001350| 20 8c 20 f2 73 75 70 65 | 72 4e 6f 76 61 0d 07 ee | . .supe|rNova...|
|00001360| 05 e1 0d 07 f8 05 3a 0d | 08 02 11 dd 20 f2 6e 6f |......:.|.... .no|
|00001370| 4b 6c 69 6e 67 6f 6e 73 | 0d 08 0c 25 f2 63 6c 65 |Klingons|...%.cle|
|00001380| 61 72 28 31 29 20 3a 20 | f2 63 6c 65 61 72 28 34 |ar(1) : |.clear(4|
|00001390| 29 20 3a 20 f2 63 6c 65 | 61 72 28 36 29 0d 08 16 |) : .cle|ar(6)...|
|000013a0| 28 f2 66 6f 6e 74 28 36 | 32 34 2c 32 32 38 2c 38 |(.font(6|24,228,8|
|000013b0| 2c 22 53 45 4e 53 4f 52 | 53 20 52 45 50 4f 52 54 |,"SENSOR|S REPORT|
|000013c0| 20 4e 4f 22 29 0d 08 20 | 27 f2 66 6f 6e 74 28 36 | NO").. |'.font(6|
|000013d0| 32 34 2c 31 39 32 2c 38 | 2c 22 4b 4c 49 4e 47 4f |24,192,8|,"KLINGO|
|000013e0| 4e 53 20 49 4e 20 54 48 | 49 53 22 29 0d 08 2a 25 |NS IN TH|IS")..*%|
|000013f0| f2 66 6f 6e 74 28 36 32 | 34 2c 31 35 36 2c 38 2c |.font(62|4,156,8,|
|00001400| 22 51 55 41 44 52 41 4e | 54 20 2e 2e 2e 2e 2e 22 |"QUADRAN|T ....."|
|00001410| 29 0d 08 34 05 e1 0d 08 | 3e 05 3a 0d 08 48 0e dd |)..4....|>.:..H..|
|00001420| 20 f2 70 68 61 73 6f 72 | 73 0d 08 52 0c e7 20 4b | .phasor|s..R.. K|
|00001430| 33 3c 31 20 8c 0d 08 5c | 1a 20 20 20 20 20 3a 20 |3<1 ...\|.     : |
|00001440| f2 6e 6f 4b 6c 69 6e 67 | 6f 6e 73 20 3a 20 e1 0d |.noKling|ons : ..|
|00001450| 08 66 05 cd 0d 08 70 19 | f2 63 6c 65 61 72 28 34 |.f....p.|.clear(4|
|00001460| 29 20 3a 20 f2 63 6c 65 | 61 72 28 36 29 0d 08 7a |) : .cle|ar(6)..z|
|00001470| 0e e7 20 44 28 39 29 3c | 30 20 8c 0d 08 84 2d 20 |.. D(9)<|0 ....- |
|00001480| 20 20 20 20 3a 20 f2 66 | 6f 6e 74 28 36 32 34 2c |    : .f|ont(624,|
|00001490| 32 32 38 2c 31 2c 22 43 | 4f 4d 42 41 54 20 43 4f |228,1,"C|OMBAT CO|
|000014a0| 4d 50 55 54 45 52 22 29 | 0d 08 8e 2b 20 20 20 20 |MPUTER")|...+    |
|000014b0| 20 3a 20 f2 66 6f 6e 74 | 28 36 32 34 2c 31 39 32 | : .font|(624,192|
|000014c0| 2c 31 2c 22 49 53 20 44 | 4f 57 4e 20 2e 2e 2e 2e |,1,"IS D|OWN ....|
|000014d0| 2e 22 29 0d 08 98 0c 20 | 20 20 20 20 3a 20 e1 0d |.").... |    : ..|
|000014e0| 08 a2 05 cd 0d 08 ac 0e | e7 20 44 28 34 29 3c 30 |........|. D(4)<0|
|000014f0| 20 8c 0d 08 b6 2f 20 20 | 20 20 20 3a 20 f2 66 6f | ..../  |   : .fo|
|00001500| 6e 74 28 36 32 34 2c 32 | 32 38 2c 31 2c 22 50 48 |nt(624,2|28,1,"PH|
|00001510| 41 53 4f 52 53 20 41 52 | 45 20 44 4f 57 4e 21 22 |ASORS AR|E DOWN!"|
|00001520| 29 0d 08 c0 0c 20 20 20 | 20 20 3a 20 e1 0d 08 ca |)....   |  : ....|
|00001530| 05 cd 0d 08 d4 28 f2 66 | 6f 6e 74 28 36 32 34 2c |.....(.f|ont(624,|
|00001540| 32 32 38 2c 38 2c 22 45 | 4e 45 52 47 59 20 42 41 |228,8,"E|NERGY BA|
|00001550| 4e 4b 53 20 48 41 56 45 | 22 29 0d 08 de 2b f2 66 |NKS HAVE|")...+.f|
|00001560| 6f 6e 74 28 36 32 34 2c | 31 39 32 2c 38 2c c3 28 |ont(624,|192,8,.(|
|00001570| 45 29 2b 22 20 55 4e 49 | 54 53 20 55 53 41 42 4c |E)+" UNI|TS USABL|
|00001580| 45 20 2d 22 29 0d 08 e8 | 32 58 3d a4 69 6e 70 75 |E -")...|2X=.inpu|
|00001590| 74 28 36 32 34 2c 31 35 | 36 2c 39 30 30 2c 31 35 |t(624,15|6,900,15|
|000015a0| 36 2c 33 2c 22 55 4e 49 | 54 53 20 54 4f 20 46 49 |6,3,"UNI|TS TO FI|
|000015b0| 52 45 3a 22 2c 34 29 0d | 08 f2 0d e7 20 58 3c 31 |RE:",4).|.... X<1|
|000015c0| 20 8c 20 e1 0d 08 fc 0d | e7 20 45 2d 58 3c 30 20 | . .....|. E-X<0 |
|000015d0| 8c 0d 09 06 45 20 20 20 | 20 20 3a 20 f2 70 72 69 |....E   |  : .pri|
|000015e0| 6e 74 65 72 28 32 2c 22 | 52 22 2c 22 49 4e 53 55 |nter(2,"|R","INSU|
|000015f0| 46 46 49 43 45 4e 54 20 | 45 4e 45 52 47 59 20 46 |FFICENT |ENERGY F|
|00001600| 4f 52 20 50 48 41 53 4f | 52 20 53 48 4f 54 20 2e |OR PHASO|R SHOT .|
|00001610| 2e 2e 2e 2e 22 29 0d 09 | 10 1a 20 20 20 20 20 3a |....")..|..     :|
|00001620| 20 f2 73 70 61 63 65 20 | 3a 20 e5 20 8d 44 70 48 | .space |: . .DpH|
|00001630| 0d 09 1a 05 cd 0d 09 24 | 24 45 3d 45 2d 58 20 3a |.......$|$E=E-X :|
|00001640| 20 f2 75 70 64 61 74 65 | 42 61 6e 6b 73 20 3a 20 | .update|Banks : |
|00001650| f2 63 6c 65 61 72 28 34 | 29 0d 09 2e 35 f2 70 72 |.clear(4|)...5.pr|
|00001660| 69 6e 74 65 72 28 32 2c | 22 59 22 2c 22 50 48 41 |inter(2,|"Y","PHA|
|00001670| 53 4f 52 20 53 54 52 49 | 4b 45 20 52 45 50 4f 52 |SOR STRI|KE REPOR|
|00001680| 54 3a 22 29 20 3a 20 57 | 3d a6 28 34 30 29 0d 09 |T:") : W|=.(40)..|
|00001690| 38 0e e3 20 49 25 3d 31 | 20 b8 20 33 0d 09 42 17 |8.. I%=1| . 3..B.|
|000016a0| e7 20 4b 28 49 25 2c 33 | 29 3c 3d 30 20 8c 20 8d |. K(I%,3|)<=0 . .|
|000016b0| 74 66 49 0d 09 4c 2b 48 | 3d a8 28 58 2f 4b 33 2f |tfI..L+H|=.(X/K3/|
|000016c0| 28 a4 44 28 30 29 2f 32 | 29 29 20 3a 20 4b 28 49 |(.D(0)/2|)) : K(I|
|000016d0| 25 2c 33 29 3d 4b 28 49 | 25 2c 33 29 2d 48 0d 09 |%,3)=K(I|%,3)-H..|
|000016e0| 56 52 f2 70 72 69 6e 74 | 65 72 28 32 2c 22 59 22 |VR.print|er(2,"Y"|
|000016f0| 2c c3 28 48 29 2b 22 20 | 55 4e 49 54 20 48 49 54 |,.(H)+" |UNIT HIT|
|00001700| 20 49 4e 20 53 45 43 54 | 4f 52 20 22 2b c3 28 4b | IN SECT|OR "+.(K|
|00001710| 28 49 25 2c 32 29 29 2b | 22 2e 22 2b c3 28 4b 28 |(I%,2))+|"."+.(K(|
|00001720| 49 25 2c 31 29 29 2b 22 | 20 2e 2e 2e 2e 2e 22 29 |I%,1))+"| .....")|
|00001730| 0d 09 60 0b 57 3d a6 28 | 34 30 29 0d 09 6a 12 e7 |..`.W=.(|40)..j..|
|00001740| 20 4b 28 49 25 2c 33 29 | 3c 3d 30 20 8c 0d 09 74 | K(I%,3)|<=0 ...t|
|00001750| 1d 20 20 20 20 20 3a 20 | f2 6b 6c 69 6e 67 6f 6e |.     : |.klingon|
|00001760| 57 69 70 65 28 59 2d 35 | 32 29 0d 09 7e 21 20 20 |Wipe(Y-5|2)..~!  |
|00001770| 20 20 20 3a 20 e7 20 4b | 39 3c 3d 30 20 8c 20 f2 |   : . K|9<=0 . .|
|00001780| 64 65 61 64 28 34 29 20 | 3a 20 e1 0d 09 88 47 cc |dead(4) |: ....G.|
|00001790| 20 3a 20 f2 70 72 69 6e | 74 65 72 28 32 2c 22 59 | : .prin|ter(2,"Y|
|000017a0| 22 2c 22 54 41 52 47 45 | 54 20 48 41 53 20 22 2b |","TARGE|T HAS "+|
|000017b0| c3 28 4b 28 49 25 2c 33 | 29 29 2b 22 20 55 4e 49 |.(K(I%,3|))+" UNI|
|000017c0| 54 53 20 52 45 4d 41 49 | 4e 49 4e 47 20 2e 2e 2e |TS REMAI|NING ...|
|000017d0| 22 29 0d 09 92 05 cd 0d | 09 9c 0b 57 3d a6 28 34 |")......|...W=.(4|
|000017e0| 30 29 0d 09 a6 05 ed 0d | 09 b0 2b f2 73 68 6f 72 |0)......|..+.shor|
|000017f0| 74 52 61 6e 67 65 53 63 | 61 6e 20 3a 20 f2 63 6c |tRangeSc|an : .cl|
|00001800| 65 61 72 28 31 29 20 3a | 20 f2 63 6c 65 61 72 28 |ear(1) :| .clear(|
|00001810| 36 29 0d 09 ba 1a e7 20 | 45 3c 31 20 80 20 53 3c |6)..... |E<1 . S<|
|00001820| 31 20 8c 20 f2 64 65 61 | 64 28 31 29 0d 09 c4 05 |1 . .dea|d(1)....|
|00001830| e1 0d 09 ce 05 3a 0d 09 | d8 10 dd 20 f2 74 6f 72 |.....:..|... .tor|
|00001840| 70 65 64 6f 65 73 0d 09 | e2 0c e7 20 4b 33 3c 31 |pedoes..|... K3<1|
|00001850| 20 8c 0d 09 ec 1a 20 20 | 20 20 20 3a 20 f2 6e 6f | .....  |   : .no|
|00001860| 4b 6c 69 6e 67 6f 6e 73 | 20 3a 20 e1 0d 09 f6 05 |Klingons| : .....|
|00001870| cd 0d 0a 00 0d f2 63 6c | 65 61 72 28 34 29 0d 0a |......cl|ear(4)..|
|00001880| 0a 0e e7 20 44 28 39 29 | 3c 30 20 8c 0d 0a 14 2d |... D(9)|<0 ....-|
|00001890| 20 20 20 20 20 3a 20 f2 | 66 6f 6e 74 28 36 32 34 |     : .|font(624|
|000018a0| 2c 32 32 38 2c 31 2c 22 | 43 4f 4d 42 41 54 20 43 |,228,1,"|COMBAT C|
|000018b0| 4f 4d 50 55 54 45 52 22 | 29 0d 0a 1e 2b 20 20 20 |OMPUTER"|)...+   |
|000018c0| 20 20 3a 20 f2 66 6f 6e | 74 28 36 32 34 2c 31 39 |  : .fon|t(624,19|
|000018d0| 32 2c 31 2c 22 49 53 20 | 44 4f 57 4e 20 2e 2e 2e |2,1,"IS |DOWN ...|
|000018e0| 2e 2e 22 29 0d 0a 28 0c | 20 20 20 20 20 3a 20 e1 |..")..(.|     : .|
|000018f0| 0d 0a 32 05 cd 0d 0a 3c | 0b e7 20 50 3d 30 20 8c |..2....<|.. P=0 .|
|00001900| 0d 0a 46 2b 20 20 20 20 | 20 3a 20 f2 66 6f 6e 74 |..F+    | : .font|
|00001910| 28 36 32 34 2c 32 32 38 | 2c 31 2c 22 41 4c 4c 20 |(624,228|,1,"ALL |
|00001920| 54 4f 52 50 45 44 4f 45 | 53 22 29 0d 0a 50 2c 20 |TORPEDOE|S")..P, |
|00001930| 20 20 20 20 3a 20 f2 66 | 6f 6e 74 28 36 32 34 2c |    : .f|ont(624,|
|00001940| 31 39 32 2c 31 2c 22 45 | 58 50 45 4e 44 45 44 20 |192,1,"E|XPENDED |
|00001950| 2e 2e 2e 2e 2e 22 29 0d | 0a 5a 0c 20 20 20 20 20 |.....").|.Z.     |
|00001960| 3a 20 e1 0d 0a 64 05 cd | 0d 0a 6e 0e e7 20 44 28 |: ...d..|..n.. D(|
|00001970| 35 29 3c 30 20 8c 0d 0a | 78 2e 20 20 20 20 20 3a |5)<0 ...|x.     :|
|00001980| 20 f2 66 6f 6e 74 28 36 | 32 34 2c 32 32 38 2c 31 | .font(6|24,228,1|
|00001990| 2c 22 50 48 4f 54 4f 4e | 20 54 55 42 45 53 20 41 |,"PHOTON| TUBES A|
|000019a0| 52 45 22 29 0d 0a 82 2b | 20 20 20 20 20 3a 20 f2 |RE")...+|     : .|
|000019b0| 66 6f 6e 74 28 36 32 34 | 2c 31 39 32 2c 31 2c 22 |font(624|,192,1,"|
|000019c0| 44 41 4d 41 47 45 44 20 | 2e 2e 2e 2e 2e 22 29 0d |DAMAGED |.....").|
|000019d0| 0a 8c 0c 20 20 20 20 20 | 3a 20 e1 0d 0a 96 05 cd |...     |: ......|
|000019e0| 0d 0a a0 29 f2 66 6f 6e | 74 28 36 32 34 2c 32 32 |...).fon|t(624,22|
|000019f0| 38 2c 33 2c 22 46 49 52 | 45 20 42 45 41 52 49 4e |8,3,"FIR|E BEARIN|
|00001a00| 47 20 28 30 2d 37 29 22 | 29 0d 0a aa 26 43 31 3d |G (0-7)"|)...&C1=|
|00001a10| a4 69 6e 70 75 74 28 36 | 32 34 2c 31 39 32 2c 36 |.input(6|24,192,6|
|00001a20| 34 38 2c 31 39 32 2c 33 | 2c 22 3a 22 2c 34 29 0d |48,192,3|,":",4).|
|00001a30| 0a b4 18 43 31 3d 43 31 | 2b 31 20 3a 20 e7 20 43 |...C1=C1|+1 : . C|
|00001a40| 31 3e 39 20 8c 20 e1 0d | 0a be 12 f2 66 69 72 65 |1>9 . ..|....fire|
|00001a50| 54 6f 72 70 65 64 6f 65 | 73 0d 0a c8 05 e1 0d 0a |Torpedoe|s.......|
|00001a60| d2 05 3a 0d 0a dc 14 dd | 20 f2 66 69 72 65 54 6f |..:.....| .fireTo|
|00001a70| 72 70 65 64 6f 65 73 0d | 0a e6 0e 46 25 3d 30 20 |rpedoes.|...F%=0 |
|00001a80| 3a 20 f2 58 59 0d 0a f0 | 3a 58 3d 53 31 20 3a 20 |: .XY...|:X=S1 : |
|00001a90| 59 3d 53 32 20 3a 20 50 | 3d 50 2d 31 20 3a 20 f2 |Y=S2 : P|=P-1 : .|
|00001aa0| 66 6f 6e 74 28 36 32 34 | 2c 31 35 36 2c 38 2c 22 |font(624|,156,8,"|
|00001ab0| 54 4f 52 50 45 44 4f 20 | 54 52 41 43 4b 22 29 0d |TORPEDO |TRACK").|
|00001ac0| 0a fa 1d 58 3d 58 2b 58 | 31 20 3a 20 59 3d 59 2b |...X=X+X|1 : Y=Y+|
|00001ad0| 58 32 20 3a 20 57 3d a6 | 28 32 35 29 0d 0b 04 1d |X2 : W=.|(25)....|
|00001ae0| e7 20 58 3c 31 20 84 20 | 58 3e 38 20 84 20 59 3c |. X<1 . |X>8 . Y<|
|00001af0| 31 20 84 20 59 3e 38 20 | 8c 0d 0b 0e 3d 20 20 20 |1 . Y>8 |....=   |
|00001b00| 20 20 3a 20 f2 63 6c 65 | 61 72 28 34 29 20 3a 20 |  : .cle|ar(4) : |
|00001b10| f2 70 72 69 6e 74 65 72 | 28 32 2c 22 59 22 2c 22 |.printer|(2,"Y","|
|00001b20| 54 4f 52 50 45 44 4f 20 | 4d 49 53 53 45 44 20 2e |TORPEDO |MISSED .|
|00001b30| 2e 2e 2e 2e 22 29 0d 0b | 18 0c 20 20 20 20 20 3a |....")..|..     :|
|00001b40| 20 e1 0d 0b 22 05 cd 0d | 0b 2c 21 78 24 3d c3 28 | ..."...|.,!x$=.(|
|00001b50| a8 28 58 2b 2e 35 29 29 | 20 3a 20 79 24 3d c3 28 |.(X+.5))| : y$=.(|
|00001b60| a8 28 59 2b 2e 35 29 29 | 0d 0b 36 1d e6 20 30 20 |.(Y+.5))|..6.. 0 |
|00001b70| 3a 20 c8 93 20 c8 90 20 | 39 32 30 2c 31 32 34 2c |: .. .. |920,124,|
|00001b80| 36 34 2c 33 32 0d 0b 40 | 1e f2 66 6f 6e 74 28 39 |64,32..@|..font(9|
|00001b90| 32 30 2c 31 35 36 2c 33 | 2c 79 24 2b 22 2e 22 2b |20,156,3|,y$+"."+|
|00001ba0| 78 24 29 0d 0b 4a 1f e7 | 20 a8 28 58 2b 2e 32 35 |x$)..J..| .(X+.25|
|00001bb0| 29 3c 3e a8 28 58 2b 2e | 37 35 29 20 8c 20 8d 64 |)<>.(X+.|75) . .d|
|00001bc0| 7a 4a 0d 0b 54 1f e7 20 | a8 28 59 2b 2e 32 35 29 |zJ..T.. |.(Y+.25)|
|00001bd0| 3c 3e a8 28 59 2b 2e 37 | 35 29 20 8c 20 8d 64 7a |<>.(Y+.7|5) . .dz|
|00001be0| 4a 0d 0b 5e 1b 5a 31 3d | a8 28 58 2b 2e 35 29 20 |J..^.Z1=|.(X+.5) |
|00001bf0| 3a 20 5a 32 3d a8 28 59 | 2b 2e 35 29 0d 0b 68 23 |: Z2=.(Y|+.5)..h#|
|00001c00| 41 24 3d 22 22 20 3a 20 | f2 63 68 65 63 6b 20 3a |A$="" : |.check :|
|00001c10| 20 e7 20 5a 33 3c 3e 30 | 20 8c 20 8d 64 7a 4a 0d | . Z3<>0| . .dzJ.|
|00001c20| 0b 72 25 41 24 3d 22 6b | 6c 69 6e 67 6f 6e 22 20 |.r%A$="k|lingon" |
|00001c30| 3a 20 f2 63 68 65 63 6b | 20 3a 20 e7 20 5a 33 3c |: .check| : . Z3<|
|00001c40| 3e 30 20 8c 0d 0b 7c 47 | 20 20 20 20 20 3a 20 f2 |>0 ...|G|     : .|
|00001c50| 63 6c 65 61 72 28 34 29 | 20 3a 20 f2 70 72 69 6e |clear(4)| : .prin|
|00001c60| 74 65 72 28 32 2c 22 52 | 22 2c 22 54 41 52 47 45 |ter(2,"R|","TARGE|
|00001c70| 54 20 4b 4c 49 4e 47 4f | 4e 20 44 45 53 54 52 4f |T KLINGO|N DESTRO|
|00001c80| 59 45 44 20 2e 2e 2e 2e | 2e 22 29 0d 0b 86 1c 20 |YED ....|.").... |
|00001c90| 20 20 20 20 3a 20 4b 33 | 3d 4b 33 2d 31 20 3a 20 |    : K3|=K3-1 : |
|00001ca0| 4b 39 3d 4b 39 2d 31 0d | 0b 90 21 20 20 20 20 20 |K9=K9-1.|..!     |
|00001cb0| 3a 20 e7 20 4b 39 3c 3d | 30 20 8c 20 f2 64 65 61 |: . K9<=|0 . .dea|
|00001cc0| 64 28 34 29 20 3a 20 e1 | 0d 0b 9a 15 20 20 20 20 |d(4) : .|....    |
|00001cd0| 20 3a 20 e3 20 49 25 3d | 31 20 b8 20 33 0d 0b a4 | : . I%=|1 . 3...|
|00001ce0| 1f 20 20 20 20 20 3a 20 | e7 20 5a 31 3c 3e 4b 28 |.     : |. Z1<>K(|
|00001cf0| 49 25 2c 31 29 20 8c 20 | 8d 64 42 4b 0d 0b ae 32 |I%,1) . |.dBK...2|
|00001d00| 20 20 20 20 20 3a 20 e7 | 20 5a 32 3d 4b 28 49 25 |     : .| Z2=K(I%|
|00001d10| 2c 32 29 20 8c 20 4b 28 | 49 25 2c 33 29 3d 30 20 |,2) . K(|I%,3)=0 |
|00001d20| 3a 20 51 24 28 5a 31 2c | 5a 32 29 3d 22 22 0d 0b |: Q$(Z1,|Z2)=""..|
|00001d30| b8 37 20 20 20 20 20 3a | 20 47 28 51 31 2c 51 32 |.7     :| G(Q1,Q2|
|00001d40| 29 3d 4b 33 2a 31 30 30 | 2b 42 33 2a 31 30 2b 53 |)=K3*100|+B3*10+S|
|00001d50| 33 20 3a 20 5a 28 51 31 | 2c 51 32 29 3d 47 28 51 |3 : Z(Q1|,Q2)=G(Q|
|00001d60| 31 2c 51 32 29 0d 0b c2 | 22 20 20 20 20 20 3a 20 |1,Q2)...|"     : |
|00001d70| ed 20 3a 20 f2 73 68 6f | 72 74 52 61 6e 67 65 53 |. : .sho|rtRangeS|
|00001d80| 63 61 6e 20 3a 20 e1 0d | 0b cc 1a cc 20 3a 20 41 |can : ..|.... : A|
|00001d90| 24 3d 22 73 74 61 72 22 | 20 3a 20 f2 63 68 65 63 |$="star"| : .chec|
|00001da0| 6b 0d 0b d6 05 cd 0d 0b | e0 0d e7 20 5a 33 3c 3e |k.......|... Z3<>|
|00001db0| 30 20 8c 0d 0b ea 44 20 | 20 20 20 20 3a 20 f2 63 |0 ....D |    : .c|
|00001dc0| 6c 65 61 72 28 34 29 20 | 3a 20 f2 70 72 69 6e 74 |lear(4) |: .print|
|00001dd0| 65 72 28 32 2c 22 59 22 | 2c 22 53 54 41 52 20 41 |er(2,"Y"|,"STAR A|
|00001de0| 42 53 4f 52 42 45 44 20 | 54 4f 52 50 45 44 4f 20 |BSORBED |TORPEDO |
|00001df0| 2e 2e 2e 2e 2e 22 29 0d | 0b f4 1f 20 20 20 20 20 |.....").|...     |
|00001e00| 3a 20 e7 20 b3 28 31 29 | 3e 2e 38 20 8c 20 f2 64 |: . .(1)|>.8 . .d|
|00001e10| 65 61 64 28 35 29 0d 0b | fe 0c 20 20 20 20 20 3a |ead(5)..|..     :|
|00001e20| 20 e1 0d 0c 08 1e cc 20 | 3a 20 41 24 3d 22 73 74 | ...... |: A$="st|
|00001e30| 61 72 62 61 73 65 22 20 | 3a 20 f2 63 68 65 63 6b |arbase" |: .check|
|00001e40| 0d 0c 12 05 cd 0d 0c 1c | 13 e7 20 5a 33 3d 30 20 |........|.. Z3=0 |
|00001e50| 8c 20 e5 20 8d 64 7a 4a | 0d 0c 26 05 cd 0d 0c 30 |. . .dzJ|..&....0|
|00001e60| 44 f2 63 6c 65 61 72 28 | 34 29 20 3a 20 f2 70 72 |D.clear(|4) : .pr|
|00001e70| 69 6e 74 65 72 28 32 2c | 22 42 22 2c 22 53 54 41 |inter(2,|"B","STA|
|00001e80| 52 42 41 53 45 20 44 45 | 53 54 52 4f 59 45 44 20 |RBASE DE|STROYED |
|00001e90| 2e 2e 2e 2e 2e 22 29 20 | 3a 20 57 3d a6 28 38 30 |.....") |: W=.(80|
|00001ea0| 29 0d 0c 3a 42 f2 70 72 | 69 6e 74 65 72 28 32 2c |)..:B.pr|inter(2,|
|00001eb0| 22 59 22 2c 22 59 4f 55 | 20 57 49 4c 4c 20 41 50 |"Y","YOU| WILL AP|
|00001ec0| 50 45 41 52 20 42 45 46 | 4f 52 20 41 20 43 4f 55 |PEAR BEF|OR A COU|
|00001ed0| 52 54 20 4d 41 52 53 48 | 41 4c 4c 20 2e 2e 2e 2e |RT MARSH|ALL ....|
|00001ee0| 2e 22 29 0d 0c 44 40 57 | 3d a6 28 34 30 29 20 3a |.")..D@W|=.(40) :|
|00001ef0| 20 f2 70 72 69 6e 74 65 | 72 28 32 2c 22 59 22 2c | .printe|r(2,"Y",|
|00001f00| 22 49 46 20 59 4f 55 20 | 53 55 52 56 49 56 45 20 |"IF YOU |SURVIVE |
|00001f10| 54 48 45 20 4d 49 53 53 | 49 4f 4e 20 2e 2e 2e 2e |THE MISS|ION ....|
|00001f20| 2e 22 29 0d 0c 4e 24 42 | 33 3d 42 33 2d 31 20 3a |.")..N$B|3=B3-1 :|
|00001f30| 20 42 39 3d 42 39 2d 31 | 20 3a 20 51 24 28 5a 31 | B9=B9-1| : Q$(Z1|
|00001f40| 2c 5a 32 29 3d 22 22 0d | 0c 58 30 47 28 51 31 2c |,Z2)="".|.X0G(Q1,|
|00001f50| 51 32 29 3d 4b 33 2a 31 | 30 30 2b 42 33 2a 31 30 |Q2)=K3*1|00+B3*10|
|00001f60| 2b 53 33 20 3a 20 5a 28 | 51 31 2c 51 32 29 3d 47 |+S3 : Z(|Q1,Q2)=G|
|00001f70| 28 51 31 2c 51 32 29 0d | 0c 62 14 e7 20 45 3c 31 |(Q1,Q2).|.b.. E<1|
|00001f80| 20 8c 20 f2 64 65 61 64 | 28 31 29 0d 0c 6c 05 e1 | . .dead|(1)..l..|
|00001f90| 0d 0c 76 05 3a 0d 0c 80 | 10 dd 20 f2 64 65 66 6c |..v.:...|.. .defl|
|00001fa0| 65 63 74 6f 72 0d 0c 8a | 0d f2 63 6c 65 61 72 28 |ector...|..clear(|
|00001fb0| 34 29 0d 0c 94 0e e7 20 | 44 28 36 29 3c 30 20 8c |4)..... |D(6)<0 .|
|00001fc0| 0d 0c 9e 2c 20 20 20 20 | 20 3a 20 f2 66 6f 6e 74 |...,    | : .font|
|00001fd0| 28 36 32 34 2c 32 32 38 | 2c 31 2c 22 44 45 46 4c |(624,228|,1,"DEFL|
|00001fe0| 45 43 54 4f 52 53 20 41 | 52 45 22 29 0d 0c a8 2e |ECTORS A|RE")....|
|00001ff0| 20 20 20 20 20 3a 20 f2 | 66 6f 6e 74 28 36 32 34 |     : .|font(624|
|00002000| 2c 31 39 32 2c 31 2c 22 | 4f 55 54 20 4f 46 20 41 |,192,1,"|OUT OF A|
|00002010| 43 54 49 4f 4e 20 2e 2e | 22 29 0d 0c b2 0c 20 20 |CTION ..|")....  |
|00002020| 20 20 20 3a 20 e1 0d 0c | bc 05 cd 0d 0c c6 29 f2 |   : ...|......).|
|00002030| 66 6f 6e 74 28 36 32 34 | 2c 32 32 38 2c 38 2c 22 |font(624|,228,8,"|
|00002040| 45 4e 45 52 47 59 20 42 | 41 4e 4b 53 20 22 2b c3 |ENERGY B|ANKS "+.|
|00002050| 28 45 29 29 0d 0c d0 29 | f2 66 6f 6e 74 28 36 32 |(E))...)|.font(62|
|00002060| 34 2c 31 39 32 2c 35 2c | 22 44 45 46 4c 45 43 54 |4,192,5,|"DEFLECT|
|00002070| 4f 52 20 41 54 20 22 2b | c3 28 53 29 29 0d 0c da |OR AT "+|.(S))...|
|00002080| 2b 58 3d a4 69 6e 70 75 | 74 28 36 32 34 2c 31 35 |+X=.inpu|t(624,15|
|00002090| 36 2c 38 30 30 2c 31 35 | 36 2c 33 2c 22 53 45 54 |6,800,15|6,3,"SET|
|000020a0| 20 54 4f 3a 22 2c 34 29 | 0d 0c e4 0d e7 20 58 3e | TO:",4)|..... X>|
|000020b0| 45 2b 53 20 8c 0d 0c ee | 0d f2 63 6c 65 61 72 28 |E+S ....|..clear(|
|000020c0| 34 29 0d 0c f8 41 20 20 | 20 20 20 3a 20 f2 70 72 |4)...A  |   : .pr|
|000020d0| 69 6e 74 65 72 28 32 2c | 22 59 22 2c 22 49 4e 53 |inter(2,|"Y","INS|
|000020e0| 55 46 46 49 43 45 4e 54 | 20 45 4e 45 52 47 59 20 |UFFICENT| ENERGY |
|000020f0| 46 4f 52 20 53 45 54 54 | 49 4e 47 20 2e 2e 2e 2e |FOR SETT|ING ....|
|00002100| 2e 22 29 0d 0d 02 1b 20 | 20 20 20 20 3a 20 57 3d |.").... |    : W=|
|00002110| a6 28 38 30 29 20 3a 20 | e5 20 8d 74 4a 4c 0d 0d |.(80) : |. .tJL..|
|00002120| 0c 05 cd 0d 0d 16 17 57 | 3d a6 28 31 35 29 20 3a |.......W|=.(15) :|
|00002130| 20 f2 63 6c 65 61 72 28 | 34 29 0d 0d 20 12 e7 20 | .clear(|4).. .. |
|00002140| 58 3c 3d 31 20 84 20 58 | 3d 53 20 8c 0d 0d 2a 2e |X<=1 . X|=S ...*.|
|00002150| 20 20 20 20 20 3a 20 f2 | 66 6f 6e 74 28 36 32 34 |     : .|font(624|
|00002160| 2c 32 32 38 2c 38 2c 22 | 44 45 46 4c 45 43 54 4f |,228,8,"|DEFLECTO|
|00002170| 52 53 20 53 54 49 4c 4c | 22 29 0d 0d 34 30 20 20 |RS STILL|")..40  |
|00002180| 20 20 20 3a 20 f2 66 6f | 6e 74 28 36 32 34 2c 31 |   : .fo|nt(624,1|
|00002190| 39 32 2c 38 2c 22 55 4e | 43 48 41 4e 47 45 44 20 |92,8,"UN|CHANGED |
|000021a0| 41 54 20 22 2b c3 28 53 | 29 29 0d 0d 3e 24 cc 20 |AT "+.(S|))..>$. |
|000021b0| 3a 20 45 3d 45 2b 53 2d | 58 20 3a 20 53 3d 58 20 |: E=E+S-|X : S=X |
|000021c0| 3a 20 f2 75 70 64 61 74 | 65 42 61 6e 6b 73 0d 0d |: .updat|eBanks..|
|000021d0| 48 2f 20 20 20 20 20 3a | 20 f2 66 6f 6e 74 28 36 |H/     :| .font(6|
|000021e0| 32 34 2c 32 32 38 2c 38 | 2c 22 44 45 46 4c 45 43 |24,228,8|,"DEFLEC|
|000021f0| 54 4f 52 53 20 53 54 41 | 42 4c 45 22 29 0d 0d 52 |TORS STA|BLE")..R|
|00002200| 30 20 20 20 20 20 3a 20 | f2 66 6f 6e 74 28 36 32 |0     : |.font(62|
|00002210| 34 2c 31 39 32 2c 38 2c | 22 41 54 20 22 2b c3 28 |4,192,8,|"AT "+.(|
|00002220| 53 29 2b 22 20 55 4e 49 | 54 53 2e 22 29 0d 0d 5c |S)+" UNI|TS.")..\|
|00002230| 05 cd 0d 0d 66 19 f2 63 | 6c 65 61 72 28 31 29 20 |....f..c|lear(1) |
|00002240| 3a 20 f2 63 6c 65 61 72 | 28 36 29 0d 0d 70 05 e1 |: .clear|(6)..p..|
|00002250| 0d 0d 7a 05 3a 0d 0d 84 | 13 dd 20 f2 64 61 6d 61 |..z.:...|.. .dama|
|00002260| 67 65 52 65 70 6f 72 74 | 0d 0d 8e 1c ea 20 41 2c |geReport|..... A,|
|00002270| 42 2c 43 2c 59 2c 41 24 | 20 3a 20 f2 63 6c 65 61 |B,C,Y,A$| : .clea|
|00002280| 72 28 32 29 0d 0d 98 0e | e7 20 44 28 38 29 3c 30 |r(2)....|. D(8)<0|
|00002290| 20 8c 0d 0d a2 24 20 20 | 20 20 20 3a 20 f2 66 6f | ....$  |   : .fo|
|000022a0| 6e 74 28 33 32 2c 37 34 | 38 2c 31 2c 22 53 59 53 |nt(32,74|8,1,"SYS|
|000022b0| 54 45 4d 53 22 29 0d 0d | ac 23 20 20 20 20 20 3a |TEMS")..|.#     :|
|000022c0| 20 f2 66 6f 6e 74 28 33 | 32 2c 37 30 38 2c 31 2c | .font(3|2,708,1,|
|000022d0| 22 53 54 41 54 55 53 22 | 29 0d 0d b6 24 20 20 20 |"STATUS"|)...$   |
|000022e0| 20 20 3a 20 f2 66 6f 6e | 74 28 33 32 2c 36 36 38 |  : .fon|t(32,668|
|000022f0| 2c 31 2c 22 49 53 20 44 | 4f 57 4e 22 29 0d 0d c0 |,1,"IS D|OWN")...|
|00002300| 0c 20 20 20 20 20 3a 20 | e1 0d 0d ca 05 cd 0d 0d |.     : |........|
|00002310| d4 12 59 3d 37 34 38 20 | 3a 20 f7 20 8d 54 78 4e |..Y=748 |: . .TxN|
|00002320| 0d 0d de 0e e3 20 41 3d | 31 20 b8 20 31 32 0d 0d |..... A=|1 . 12..|
|00002330| e8 23 e7 20 41 3d 34 20 | 84 20 41 3d 37 20 84 20 |.#. A=4 |. A=7 . |
|00002340| 41 3d 39 20 84 20 41 3d | 31 31 20 8c 20 59 2d 3d |A=9 . A=|11 . Y-=|
|00002350| 34 0d 0d f2 1d f3 20 42 | 2c 41 24 20 3a 20 f2 66 |4..... B|,A$ : .f|
|00002360| 6f 6e 74 28 33 32 2c 59 | 2c 42 2c 41 24 29 0d 0d |ont(32,Y|,B,A$)..|
|00002370| fc 1b 43 3d 44 28 41 29 | 2b 34 20 3a 20 e7 20 43 |..C=D(A)|+4 : . C|
|00002380| 3c 31 20 8c 20 8d 54 6e | 4e 0d 0e 06 0b e7 20 43 |<1 . .Tn|N..... C|
|00002390| 3c 34 20 8c 0d 0e 10 20 | 20 20 20 20 20 3a 20 f2 |<4 .... |     : .|
|000023a0| 66 6f 6e 74 28 36 34 2c | 59 2c 31 2c c4 43 2c 22 |font(64,|Y,1,.C,"|
|000023b0| 5f 22 29 29 0d 0e 1a 1d | cc 20 3a 20 f2 66 6f 6e |_"))....|. : .fon|
|000023c0| 74 28 36 34 2c 59 2c 42 | 2c c4 43 2c 22 5f 22 29 |t(64,Y,B|,.C,"_")|
|000023d0| 29 0d 0e 24 05 cd 0d 0e | 2e 0d 59 2d 3d 34 30 20 |)..$....|..Y-=40 |
|000023e0| 3a 20 ed 0d 0e 38 29 dc | 20 38 2c 22 53 22 2c 38 |: ...8).| 8,"S",8|
|000023f0| 2c 22 4c 22 2c 38 2c 22 | 48 22 2c 32 2c 22 50 22 |,"L",8,"|H",2,"P"|
|00002400| 2c 32 2c 22 54 22 2c 32 | 2c 22 44 22 0d 0e 42 29 |,2,"T",2|,"D"..B)|
|00002410| dc 20 33 2c 22 57 22 2c | 33 2c 22 44 22 2c 35 2c |. 3,"W",|3,"D",5,|
|00002420| 22 43 22 2c 35 2c 22 4e | 22 2c 36 2c 22 43 22 2c |"C",5,"N|",6,"C",|
|00002430| 36 2c 22 4c 22 0d 0e 4c | 05 e1 0d 0e 56 05 3a 0d |6,"L"..L|....V.:.|
|00002440| 0e 60 15 dd 20 f2 6b 6c | 69 6e 67 6f 6e 57 69 70 |.`.. .kl|ingonWip|
|00002450| 65 28 59 29 0d 0e 6a 34 | f2 70 72 69 6e 74 65 72 |e(Y)..j4|.printer|
|00002460| 28 32 2c 22 52 22 2c 22 | 54 41 52 47 45 54 20 4b |(2,"R","|TARGET K|
|00002470| 4c 49 4e 47 4f 4e 20 44 | 45 53 54 52 4f 59 45 44 |LINGON D|ESTROYED|
|00002480| 20 2e 2e 2e 2e 2e 22 29 | 0d 0e 74 3e 4b 33 3d 4b | .....")|..t>K3=K|
|00002490| 33 2d 31 20 3a 20 4b 39 | 3d 4b 39 2d 31 20 3a 20 |3-1 : K9|=K9-1 : |
|000024a0| 5a 31 3d 4b 28 49 25 2c | 31 29 20 3a 20 5a 32 3d |Z1=K(I%,|1) : Z2=|
|000024b0| 4b 28 49 25 2c 32 29 20 | 3a 20 51 24 28 5a 31 2c |K(I%,2) |: Q$(Z1,|
|000024c0| 5a 32 29 3d 22 22 0d 0e | 7e 30 47 28 51 31 2c 51 |Z2)=""..|~0G(Q1,Q|
|000024d0| 32 29 3d 4b 33 2a 31 30 | 30 2b 42 33 2a 31 30 2b |2)=K3*10|0+B3*10+|
|000024e0| 53 33 20 3a 20 5a 28 51 | 31 2c 51 32 29 3d 47 28 |S3 : Z(Q|1,Q2)=G(|
|000024f0| 51 31 2c 51 32 29 0d 0e | 88 05 e1 0d 0e 92 05 3a |Q1,Q2)..|.......:|
|00002500| 0d 0e 9c 0d dd 20 f2 61 | 74 74 61 63 6b 0d 0e a6 |..... .a|ttack...|
|00002510| 0e e7 20 4b 33 3d 30 20 | 8c 20 e1 0d 0e b0 22 6b |.. K3=0 |. ...."k|
|00002520| 24 3d 22 53 20 41 52 45 | 22 20 3a 20 e7 20 4b 33 |$="S ARE|" : . K3|
|00002530| 3d 31 20 8c 20 6b 24 3d | 22 20 49 53 22 0d 0e ba |=1 . k$=|" IS"...|
|00002540| 0c e7 20 44 25 3d 31 20 | 8c 0d 0e c4 41 20 20 20 |.. D%=1 |....A   |
|00002550| 20 20 3a 20 f2 70 72 69 | 6e 74 65 72 28 31 2c 22 |  : .pri|nter(1,"|
|00002560| 52 22 2c c3 28 4b 33 29 | 2b 22 20 4b 4c 49 4e 47 |R",.(K3)|+" KLING|
|00002570| 4f 4e 22 2b 6b 24 2b 22 | 20 41 54 54 41 43 4b 49 |ON"+k$+"| ATTACKI|
|00002580| 4e 47 20 2e 2e 2e 2e 2e | 22 29 0d 0e ce 47 20 20 |NG .....|")...G  |
|00002590| 20 20 20 3a 20 f2 70 72 | 69 6e 74 65 72 28 32 2c |   : .pr|inter(2,|
|000025a0| 22 59 22 2c 22 53 54 41 | 52 42 41 53 45 20 53 48 |"Y","STA|RBASE SH|
|000025b0| 49 45 4c 44 53 20 50 52 | 4f 54 45 43 54 20 59 4f |IELDS PR|OTECT YO|
|000025c0| 55 52 20 56 45 53 53 45 | 4c 20 2e 2e 2e 2e 2e 22 |UR VESSE|L ....."|
|000025d0| 29 0d 0e d8 15 20 20 20 | 20 20 3a 20 f2 73 70 61 |)....   |  : .spa|
|000025e0| 63 65 20 3a 20 e1 0d 0e | e2 05 cd 0d 0e ec 3a f2 |ce : ...|......:.|
|000025f0| 70 72 69 6e 74 65 72 28 | 31 2c 22 52 22 2c c3 28 |printer(|1,"R",.(|
|00002600| 4b 33 29 2b 22 20 4b 4c | 49 4e 47 4f 4e 22 2b 6b |K3)+" KL|INGON"+k|
|00002610| 24 2b 22 20 41 54 54 41 | 43 4b 49 4e 47 20 2e 2e |$+" ATTA|CKING ..|
|00002620| 2e 2e 2e 22 29 0d 0e f6 | 26 e3 20 49 25 3d 31 20 |...")...|&. I%=1 |
|00002630| b8 20 33 20 3a 20 e7 20 | 4b 28 49 25 2c 33 29 3c |. 3 : . |K(I%,3)<|
|00002640| 3d 30 20 8c 20 e5 20 8d | 74 56 4f 0d 0f 00 1b 48 |=0 . . .|tVO....H|
|00002650| 3d a8 28 4b 28 49 25 2c | 33 29 2f a4 44 28 30 29 |=.(K(I%,|3)/.D(0)|
|00002660| 2a b3 28 38 29 29 0d 0f | 0a 54 f2 70 72 69 6e 74 |*.(8))..|.T.print|
|00002670| 65 72 28 32 2c 22 59 22 | 2c c3 28 48 29 2b 22 20 |er(2,"Y"|,.(H)+" |
|00002680| 55 4e 49 54 20 48 49 54 | 20 46 52 4f 4d 20 53 45 |UNIT HIT| FROM SE|
|00002690| 43 54 4f 52 20 22 2b c3 | 28 4b 28 49 25 2c 32 29 |CTOR "+.|(K(I%,2)|
|000026a0| 29 2b 22 2e 22 2b c3 28 | 4b 28 49 25 2c 31 29 29 |)+"."+.(|K(I%,1))|
|000026b0| 2b 22 20 2e 2e 2e 2e 2e | 22 29 0d 0f 14 15 53 53 |+" .....|")....SS|
|000026c0| 3d 53 2d 48 20 3a 20 e7 | 20 53 53 3c 30 20 8c 0d |=S-H : .| SS<0 ..|
|000026d0| 0f 1e 1d 20 20 20 20 20 | 3a 20 45 2b 3d 53 53 20 |...     |: E+=SS |
|000026e0| 3a 20 48 2d 3d 53 20 3a | 20 53 3d 30 0d 0f 28 16 |: H-=S :| S=0..(.|
|000026f0| 20 20 20 20 20 3a 20 e7 | 20 48 3c 30 20 8c 20 48 |     : .| H<0 . H|
|00002700| 3d 30 0d 0f 32 12 cc 20 | 3a 20 53 3d 53 53 20 3a |=0..2.. |: S=SS :|
|00002710| 20 48 3d 30 0d 0f 3c 05 | cd 0d 0f 46 1a 57 3d a6 | H=0..<.|...F.W=.|
|00002720| 28 34 30 29 20 3a 20 f2 | 75 70 64 61 74 65 42 61 |(40) : .|updateBa|
|00002730| 6e 6b 73 0d 0f 50 0c e7 | 20 53 3c 3d 30 20 8c 0d |nks..P..| S<=0 ..|
|00002740| 0f 5a 3d 20 20 20 20 20 | 3a 20 f2 70 72 69 6e 74 |.Z=     |: .print|
|00002750| 65 72 28 32 2c 22 52 22 | 2c 22 44 45 46 4c 45 43 |er(2,"R"|,"DEFLEC|
|00002760| 54 4f 52 20 53 48 49 45 | 4c 44 53 20 41 52 45 20 |TOR SHIE|LDS ARE |
|00002770| 44 4f 57 4e 20 2e 2e 2e | 2e 2e 22 29 0d 0f 64 28 |DOWN ...|..")..d(|
|00002780| 20 20 20 20 20 3a 20 e7 | 20 45 3c 30 20 8c 20 f2 |     : .| E<0 . .|
|00002790| 73 70 61 63 65 20 3a 20 | f2 64 65 61 64 28 33 29 |space : |.dead(3)|
|000027a0| 20 3a 20 e1 0d 0f 6e 40 | cc 20 3a 20 f2 70 72 69 | : ...n@|. : .pri|
|000027b0| 6e 74 65 72 28 32 2c 22 | 47 22 2c 22 53 48 49 45 |nter(2,"|G","SHIE|
|000027c0| 4c 44 53 20 53 54 45 41 | 44 59 20 41 54 20 22 2b |LDS STEA|DY AT "+|
|000027d0| c3 28 53 29 2b 22 20 55 | 4e 49 54 53 20 2e 2e 2e |.(S)+" U|NITS ...|
|000027e0| 2e 2e 22 29 0d 0f 78 05 | cd 0d 0f 82 0b 57 3d a6 |..")..x.|.....W=.|
|000027f0| 28 34 30 29 0d 0f 8c 13 | f2 64 61 6d 61 67 65 20 |(40)....|.damage |
|00002800| 3a 20 f2 6d 6f 76 65 0d | 0f 96 23 ed 20 3a 20 f2 |: .move.|..#. : .|
|00002810| 63 6c 65 61 72 28 31 29 | 20 3a 20 f2 73 68 6f 72 |clear(1)| : .shor|
|00002820| 74 52 61 6e 67 65 53 63 | 61 6e 0d 0f a0 05 e1 0d |tRangeSc|an......|
|00002830| 0f aa 05 3a 0d 0f b4 0d | dd 20 f2 64 61 6d 61 67 |...:....|. .damag|
|00002840| 65 0d 0f be 15 e7 20 48 | 3c 31 30 30 20 80 20 53 |e..... H|<100 . S|
|00002850| 3e 30 20 8c 20 e1 0d 0f | c8 0f 52 31 3d a8 28 b3 |>0 . ...|..R1=.(.|
|00002860| 28 31 32 29 29 0d 0f d2 | 0b e7 20 53 3e 30 20 8c |(12))...|.. S>0 .|
|00002870| 0d 0f dc 20 20 20 20 20 | 20 3a 20 44 28 52 31 29 |...     | : D(R1)|
|00002880| 3d 44 28 52 31 29 2d a8 | 28 b3 28 32 29 2b 31 29 |=D(R1)-.|(.(2)+1)|
|00002890| 0d 0f e6 11 cc 20 3a 20 | e7 20 48 3c 31 30 30 20 |..... : |. H<100 |
|000028a0| 8c 0d 0f f0 20 20 20 20 | 20 20 3a 20 44 28 52 31 |....    |  : D(R1|
|000028b0| 29 3d 44 28 52 31 29 2d | a8 28 b3 28 32 29 2b 32 |)=D(R1)-|.(.(2)+2|
|000028c0| 29 0d 0f fa 1d cc 20 3a | 20 44 28 52 31 29 3d 44 |)..... :| D(R1)=D|
|000028d0| 28 52 31 29 2d a8 28 b3 | 28 35 29 2b 32 29 0d 10 |(R1)-.(.|(5)+2)..|
|000028e0| 04 05 cd 0d 10 0e 05 cd | 0d 10 18 34 f2 70 72 69 |........|...4.pri|
|000028f0| 6e 74 65 72 28 32 2c 22 | 59 22 2c 44 24 28 52 31 |nter(2,"|Y",D$(R1|
|00002900| 29 2b 22 20 53 55 53 54 | 41 49 4e 45 44 20 44 41 |)+" SUST|AINED DA|
|00002910| 4d 41 47 45 20 2e 2e 2e | 2e 2e 22 29 0d 10 22 0e |MAGE ...|..")..".|
|00002920| e7 20 48 3e 31 30 30 30 | 20 8c 0d 10 2c 16 20 20 |. H>1000| ...,.  |
|00002930| 20 20 20 3a 20 52 31 3d | a8 28 b3 28 31 32 29 29 |   : R1=|.(.(12))|
|00002940| 0d 10 36 12 20 20 20 20 | 20 3a 20 e7 20 53 3e 30 |..6.    | : . S>0|
|00002950| 20 8c 0d 10 40 20 20 20 | 20 20 20 3a 20 44 28 52 | ...@   |   : D(R|
|00002960| 31 29 3d 44 28 52 31 29 | 2d a8 28 b3 28 32 29 2b |1)=D(R1)|-.(.(2)+|
|00002970| 32 29 0d 10 4a 1d cc 20 | 3a 20 44 28 52 31 29 3d |2)..J.. |: D(R1)=|
|00002980| 44 28 52 31 29 2d a8 28 | b3 28 35 29 2b 32 29 0d |D(R1)-.(|.(5)+2).|
|00002990| 10 54 05 cd 0d 10 5e 3e | 57 3d a6 28 34 30 29 20 |.T....^>|W=.(40) |
|000029a0| 3a 20 f2 70 72 69 6e 74 | 65 72 28 32 2c 22 59 22 |: .print|er(2,"Y"|
|000029b0| 2c 44 24 28 52 31 29 2b | 22 20 53 55 53 54 41 49 |,D$(R1)+|" SUSTAI|
|000029c0| 4e 45 44 20 44 41 4d 41 | 47 45 20 2e 2e 2e 2e 2e |NED DAMA|GE .....|
|000029d0| 22 29 0d 10 68 05 cd 0d | 10 72 11 f2 64 61 6d 61 |")..h...|.r..dama|
|000029e0| 67 65 52 65 70 6f 72 74 | 0d 10 7c 05 e1 0d 10 86 |geReport|..|.....|
|000029f0| 05 3a 0d 10 90 0e dd 20 | f2 64 65 61 64 28 61 29 |.:..... |.dead(a)|
|00002a00| 0d 10 9a 0d f2 63 6c 65 | 61 72 28 33 29 0d 10 a4 |.....cle|ar(3)...|
|00002a10| 32 f2 70 72 69 6e 74 65 | 72 28 31 2c 22 59 22 2c |2.printe|r(1,"Y",|
|00002a20| 22 59 4f 55 52 20 4d 49 | 53 53 49 4f 4e 20 48 41 |"YOUR MI|SSION HA|
|00002a30| 53 20 45 4e 44 45 44 20 | 2e 2e 2e 2e 2e 22 29 0d |S ENDED |.....").|
|00002a40| 10 ae 2d f2 74 65 78 74 | 28 33 30 38 2c 37 30 38 |..-.text|(308,708|
|00002a50| 2c 22 42 22 2c 22 53 54 | 41 52 54 52 45 4b 3a 20 |,"B","ST|ARTREK: |
|00002a60| 54 48 45 20 47 41 4d 45 | 20 2d 22 29 0d 10 b8 0a |THE GAME| -")....|
|00002a70| c8 8e 20 61 20 ca 0d 10 | c2 35 c9 20 31 20 3a 20 |.. a ...|.5. 1 : |
|00002a80| f2 74 65 78 74 28 33 30 | 38 2c 36 35 32 2c 22 57 |.text(30|8,652,"W|
|00002a90| 22 2c 22 54 48 45 20 45 | 4e 54 45 52 50 52 49 53 |","THE E|NTERPRIS|
|00002aa0| 45 20 49 53 20 44 45 41 | 44 22 29 0d 10 cc 35 20 |E IS DEA|D")...5 |
|00002ab0| 20 20 20 20 20 20 3a 20 | f2 74 65 78 74 28 33 30 |      : |.text(30|
|00002ac0| 38 2c 36 30 34 2c 22 57 | 22 2c 22 49 4e 20 53 50 |8,604,"W|","IN SP|
|00002ad0| 41 43 45 20 2d 20 59 4f | 55 20 57 49 4c 4c 22 29 |ACE - YO|U WILL")|
|00002ae0| 0d 10 d6 3a 20 20 20 20 | 20 20 20 3a 20 f2 74 65 |...:    |   : .te|
|00002af0| 78 74 28 33 30 38 2c 35 | 35 36 2c 22 57 22 2c 22 |xt(308,5|56,"W","|
|00002b00| 53 55 46 46 45 52 20 41 | 20 53 4c 4f 57 20 43 4f |SUFFER A| SLOW CO|
|00002b10| 4c 44 20 44 45 41 54 48 | 22 29 0d 10 e0 38 20 20 |LD DEATH|")...8  |
|00002b20| 20 20 20 20 20 3a 20 f2 | 74 65 78 74 28 33 30 38 |     : .|text(308|
|00002b30| 2c 35 30 38 2c 22 57 22 | 2c 22 41 53 20 4c 49 46 |,508,"W"|,"AS LIF|
|00002b40| 45 20 53 55 50 50 4f 52 | 54 20 46 41 49 4c 53 21 |E SUPPOR|T FAILS!|
|00002b50| 22 29 0d 10 ea 38 c9 20 | 32 20 3a 20 f2 74 65 78 |")...8. |2 : .tex|
|00002b60| 74 28 33 30 38 2c 36 35 | 32 2c 22 57 22 2c 22 49 |t(308,65|2,"W","I|
|00002b70| 54 20 49 53 20 4e 4f 57 | 20 53 44 20 22 2b c3 28 |T IS NOW| SD "+.(|
|00002b80| 54 29 2b 22 20 41 4e 44 | 22 29 0d 10 f4 38 20 20 |T)+" AND|")...8  |
|00002b90| 20 20 20 20 20 3a 20 f2 | 74 65 78 74 28 33 30 38 |     : .|text(308|
|00002ba0| 2c 36 30 34 2c 22 57 22 | 2c 22 59 4f 55 52 20 54 |,604,"W"|,"YOUR T|
|00002bb0| 49 4d 45 20 48 41 53 20 | 52 55 4e 20 4f 55 54 21 |IME HAS |RUN OUT!|
|00002bc0| 22 29 0d 10 fe 36 c9 20 | 33 20 3a 20 f2 74 65 78 |")...6. |3 : .tex|
|00002bd0| 74 28 33 30 38 2c 36 35 | 32 2c 22 59 22 2c 22 54 |t(308,65|2,"Y","T|
|00002be0| 48 45 20 45 4e 54 45 52 | 50 52 49 53 45 20 48 41 |HE ENTER|PRISE HA|
|00002bf0| 53 20 42 45 45 4e 22 29 | 0d 11 08 31 20 20 20 20 |S BEEN")|...1    |
|00002c00| 20 20 20 3a 20 f2 74 65 | 78 74 28 33 30 38 2c 36 |   : .te|xt(308,6|
|00002c10| 30 34 2c 22 59 22 2c 22 | 44 45 53 54 52 4f 59 45 |04,"Y","|DESTROYE|
|00002c20| 44 20 2e 2e 2e 2e 2e 22 | 29 0d 11 12 34 c9 20 34 |D ....."|)...4. 4|
|00002c30| 20 3a 20 f2 74 65 78 74 | 28 33 30 38 2c 36 35 32 | : .text|(308,652|
|00002c40| 2c 22 42 22 2c 22 54 48 | 45 20 4c 41 53 54 20 4b |,"B","TH|E LAST K|
|00002c50| 4c 49 4e 47 4f 4e 20 53 | 48 49 50 22 29 0d 11 1c |LINGON S|HIP")...|
|00002c60| 34 20 20 20 20 20 20 20 | 3a 20 f2 74 65 78 74 28 |4       |: .text(|
|00002c70| 33 30 38 2c 36 30 34 2c | 22 42 22 2c 22 49 53 20 |308,604,|"B","IS |
|00002c80| 44 45 53 54 52 4f 59 45 | 44 20 2e 2e 2e 2e 2e 22 |DESTROYE|D ....."|
|00002c90| 29 0d 11 26 34 20 20 20 | 20 20 20 20 3a 20 f2 74 |)..&4   |    : .t|
|00002ca0| 65 78 74 28 33 30 38 2c | 35 35 36 2c 22 57 22 2c |ext(308,|556,"W",|
|00002cb0| 22 57 45 4c 4c 20 44 4f | 4e 45 20 43 41 50 54 41 |"WELL DO|NE CAPTA|
|00002cc0| 49 4e 21 22 29 0d 11 30 | 2a 20 20 20 20 20 20 20 |IN!")..0|*       |
|00002cd0| 3a 20 44 65 61 64 25 3d | b9 20 3a 20 f2 73 70 61 |: Dead%=|. : .spa|
|00002ce0| 63 65 20 3a 20 f2 61 67 | 61 69 6e 20 3a 20 e1 0d |ce : .ag|ain : ..|
|00002cf0| 11 3a 36 c9 20 35 20 3a | 20 f2 74 65 78 74 28 33 |.:6. 5 :| .text(3|
|00002d00| 30 38 2c 36 35 32 2c 22 | 59 22 2c 22 59 4f 55 52 |08,652,"|Y","YOUR|
|00002d10| 20 54 4f 52 50 45 44 4f | 20 48 41 53 20 43 41 55 | TORPEDO| HAS CAU|
|00002d20| 53 45 44 22 29 0d 11 44 | 39 20 20 20 20 20 20 20 |SED")..D|9       |
|00002d30| 3a 20 f2 74 65 78 74 28 | 33 30 38 2c 36 30 34 2c |: .text(|308,604,|
|00002d40| 22 59 22 2c 22 41 20 53 | 54 41 52 20 54 4f 20 47 |"Y","A S|TAR TO G|
|00002d50| 4f 20 4e 4f 56 41 20 2e | 2e 2e 2e 2e 22 29 0d 11 |O NOVA .|....")..|
|00002d60| 4e 39 20 20 20 20 20 20 | 20 3a 20 f2 74 65 78 74 |N9      | : .text|
|00002d70| 28 33 30 38 2c 35 35 36 | 2c 22 59 22 2c 22 54 48 |(308,556|,"Y","TH|
|00002d80| 45 20 45 4e 54 45 52 50 | 52 49 53 45 20 48 41 53 |E ENTERP|RISE HAS|
|00002d90| 20 42 45 45 4e 22 29 0d | 11 58 31 20 20 20 20 20 | BEEN").|.X1     |
|00002da0| 20 20 3a 20 f2 74 65 78 | 74 28 33 30 38 2c 35 30 |  : .tex|t(308,50|
|00002db0| 38 2c 22 59 22 2c 22 44 | 45 53 54 52 4f 59 45 44 |8,"Y","D|ESTROYED|
|00002dc0| 20 2e 2e 2e 2e 2e 22 29 | 0d 11 62 05 cb 0d 11 6c | .....")|..b....l|
|00002dd0| 35 f2 74 65 78 74 28 33 | 30 38 2c 34 36 30 2c 22 |5.text(3|08,460,"|
|00002de0| 52 22 2c 22 54 48 45 52 | 45 20 57 45 52 45 20 22 |R","THER|E WERE "|
|00002df0| 2b c3 28 4b 39 29 2b 22 | 20 4b 4c 49 4e 47 4f 4e |+.(K9)+"| KLINGON|
|00002e00| 22 29 0d 11 76 2e f2 74 | 65 78 74 28 33 30 38 2c |")..v..t|ext(308,|
|00002e10| 34 31 32 2c 22 52 22 2c | 22 53 48 49 50 53 20 4c |412,"R",|"SHIPS L|
|00002e20| 45 46 54 20 54 4f 20 43 | 4f 4e 51 55 45 52 22 29 |EFT TO C|ONQUER")|
|00002e30| 0d 11 80 29 f2 74 65 78 | 74 28 33 30 38 2c 33 36 |...).tex|t(308,36|
|00002e40| 34 2c 22 52 22 2c 22 54 | 48 45 20 46 45 44 45 52 |4,"R","T|HE FEDER|
|00002e50| 41 54 49 4f 4e 21 21 22 | 29 0d 11 8a 1d 44 65 61 |ATION!!"|)....Dea|
|00002e60| 64 25 3d b9 20 3a 20 f2 | 73 70 61 63 65 20 3a 20 |d%=. : .|space : |
|00002e70| f2 61 67 61 69 6e 0d 11 | 94 05 e1 0d 11 9e 05 3a |.again..|.......:|
|00002e80| 0d 11 a8 0c dd 20 f2 61 | 67 61 69 6e 0d 11 b2 18 |..... .a|gain....|
|00002e90| 57 3d a6 28 35 30 30 29 | 20 3a 20 f2 63 6c 65 61 |W=.(500)| : .clea|
|00002ea0| 72 28 33 29 0d 11 bc 2d | f2 74 65 78 74 28 33 30 |r(3)...-|.text(30|
|00002eb0| 38 2c 37 30 38 2c 22 42 | 22 2c 22 53 54 41 52 54 |8,708,"B|","START|
|00002ec0| 52 45 4b 3a 20 54 48 45 | 20 47 41 4d 45 20 2d 22 |REK: THE| GAME -"|
|00002ed0| 29 0d 11 c6 2f f2 74 65 | 78 74 28 33 30 38 2c 36 |).../.te|xt(308,6|
|00002ee0| 35 32 2c 22 57 22 2c 22 | 57 4f 55 4c 44 20 59 4f |52,"W","|WOULD YO|
|00002ef0| 55 20 4c 49 4b 45 20 41 | 4e 4f 54 48 45 52 22 29 |U LIKE A|NOTHER")|
|00002f00| 0d 11 d0 3a 59 24 3d a4 | 69 6e 70 75 74 56 61 72 |...:Y$=.|inputVar|
|00002f10| 69 6f 75 73 28 33 30 38 | 2c 36 30 34 2c 37 32 34 |ious(308|,604,724|
|00002f20| 2c 36 30 34 2c 22 57 22 | 2c 22 4d 49 53 53 49 4f |,604,"W"|,"MISSIO|
|00002f30| 4e 20 28 59 2d 4e 29 3a | 22 29 0d 11 da 19 e7 20 |N (Y-N):|")..... |
|00002f40| 59 24 3d 22 59 22 20 84 | 20 59 24 3d 22 79 22 20 |Y$="Y" .| Y$="y" |
|00002f50| 8c 20 e1 0d 11 e4 21 ff | 20 22 50 52 49 4e 54 20 |. ....!.| "PRINT |
|00002f60| 3c 53 54 72 65 6b 24 44 | 69 72 3e 2e 41 72 63 46 |<STrek$D|ir>.ArcF|
|00002f70| 6f 6e 74 22 0d 11 ee 0c | eb 20 31 32 20 3a 20 e0 |ont"....|. 12 : .|
|00002f80| 0d 11 f8 05 e1 0d 12 02 | 05 3a 0d 12 0c 10 dd 20 |........|.:..... |
|00002f90| f2 62 61 73 65 43 68 65 | 63 6b 0d 12 16 10 41 3d |.baseChe|ck....A=|
|00002fa0| a4 62 61 73 65 43 68 65 | 63 6b 0d 12 20 12 e7 20 |.baseChe|ck.. .. |
|00002fb0| 44 25 3d 30 20 80 20 41 | 3d 31 20 8c 0d 12 2a 2d |D%=0 . A|=1 ...*-|
|00002fc0| 20 20 20 20 20 3a 20 44 | 25 3d 31 20 3a 20 53 3d |     : D|%=1 : S=|
|00002fd0| 30 20 3a 20 45 3d 45 30 | 20 3a 20 50 3d 50 30 20 |0 : E=E0| : P=P0 |
|00002fe0| 3a 20 f2 64 6f 63 6b 65 | 64 0d 12 34 05 cd 0d 12 |: .docke|d..4....|
|00002ff0| 3e 17 e7 20 44 25 3d 31 | 20 80 20 41 3d 30 20 8c |>.. D%=1| . A=0 .|
|00003000| 20 44 25 3d 30 0d 12 48 | 05 e1 0d 12 52 05 3a 0d | D%=0..H|....R.:.|
|00003010| 12 5c 10 dd 20 a4 62 61 | 73 65 43 68 65 63 6b 0d |.\.. .ba|seCheck.|
|00003020| 12 66 27 e3 20 49 25 3d | 53 31 2d 31 20 b8 20 53 |.f'. I%=|S1-1 . S|
|00003030| 31 2b 31 20 3a 20 e3 20 | 4a 25 3d 53 32 2d 31 20 |1+1 : . |J%=S2-1 |
|00003040| b8 20 53 32 2b 31 0d 12 | 70 21 e7 20 49 25 3e 30 |. S2+1..|p!. I%>0|
|00003050| 20 80 20 49 25 3c 39 20 | 80 20 4a 25 3e 30 20 80 | . I%<9 |. J%>0 .|
|00003060| 20 4a 25 3c 39 20 8c 0d | 12 7a 31 20 20 20 20 20 | J%<9 ..|.z1     |
|00003070| 3a 20 41 24 3d 22 73 74 | 61 72 62 61 73 65 22 20 |: A$="st|arbase" |
|00003080| 3a 20 5a 31 3d 49 25 20 | 3a 20 5a 32 3d 4a 25 20 |: Z1=I% |: Z2=J% |
|00003090| 3a 20 f2 63 68 65 63 6b | 0d 12 84 16 20 20 20 20 |: .check|....    |
|000030a0| 20 3a 20 e7 20 5a 33 3e | 30 20 8c 20 3d 31 0d 12 | : . Z3>|0 . =1..|
|000030b0| 8e 05 cd 0d 12 98 07 ed | 20 2c 0d 12 a2 06 3d 30 |........| ,....=0|
|000030c0| 0d 12 ac 05 3a 0d 12 b6 | 0d dd 20 f2 64 6f 63 6b |....:...|.. .dock|
|000030d0| 65 64 0d 12 c0 3a f2 63 | 6c 65 61 72 28 31 29 20 |ed...:.c|lear(1) |
|000030e0| 3a 20 f2 70 72 69 6e 74 | 65 72 28 31 2c 22 42 22 |: .print|er(1,"B"|
|000030f0| 2c 22 44 4f 43 4b 45 44 | 20 41 54 20 53 54 41 52 |,"DOCKED| AT STAR|
|00003100| 42 41 53 45 20 2e 2e 2e | 2e 2e 22 29 0d 12 ca 3e |BASE ...|..")...>|
|00003110| f2 63 6c 65 61 72 28 33 | 29 20 3a 20 f2 74 65 78 |.clear(3|) : .tex|
|00003120| 74 28 33 30 38 2c 37 30 | 38 2c 22 57 22 2c 22 57 |t(308,70|8,"W","W|
|00003130| 45 4c 43 4f 4d 45 20 54 | 4f 20 53 54 41 52 42 41 |ELCOME T|O STARBA|
|00003140| 53 45 20 2e 2e 2e 2e 2e | 22 29 0d 12 d4 10 f2 65 |SE .....|").....e|
|00003150| 6e 65 72 67 79 42 61 6e | 6b 73 0d 12 de 34 f2 66 |nergyBan|ks...4.f|
|00003160| 6f 6e 74 28 33 30 38 2c | 36 39 32 2c 35 2c 22 52 |ont(308,|692,5,"R|
|00003170| 45 2d 41 52 4d 49 4e 47 | 20 41 4e 44 20 52 45 2d |E-ARMING| AND RE-|
|00003180| 46 55 45 4c 49 4e 47 20 | 48 41 56 45 22 29 0d 12 |FUELING |HAVE")..|
|00003190| e8 38 f2 66 6f 6e 74 28 | 33 30 38 2c 36 35 32 2c |.8.font(|308,652,|
|000031a0| 35 2c 22 42 45 45 4e 20 | 43 41 52 52 49 45 44 20 |5,"BEEN |CARRIED |
|000031b0| 4f 55 54 20 41 53 20 4e | 45 43 45 53 53 41 52 59 |OUT AS N|ECESSARY|
|000031c0| 20 2e 2e 2e 22 29 0d 12 | f2 38 f2 66 6f 6e 74 28 | ...")..|.8.font(|
|000031d0| 33 30 38 2c 36 31 32 2c | 37 2c 22 44 49 41 47 4e |308,612,|7,"DIAGN|
|000031e0| 4f 53 54 49 43 20 43 48 | 45 43 4b 53 20 41 52 45 |OSTIC CH|ECKS ARE|
|000031f0| 20 50 52 4f 43 45 45 44 | 49 4e 47 3a 22 29 0d 12 | PROCEED|ING:")..|
|00003200| fc 25 f2 64 61 6d 61 67 | 65 52 65 70 6f 72 74 20 |.%.damag|eReport |
|00003210| 3a 20 57 3d a6 28 31 30 | 30 29 20 3a 20 f7 20 8d |: W=.(10|0) : . .|
|00003220| 44 6a 53 0d 13 06 2d 4e | 25 3d 30 20 3a 20 4a 25 |DjS...-N|%=0 : J%|
|00003230| 3d 30 20 3a 20 58 3d 33 | 30 38 20 3a 20 59 3d 35 |=0 : X=3|08 : Y=5|
|00003240| 37 32 20 3a 20 e3 20 49 | 25 3d 31 20 b8 20 31 32 |72 : . I|%=1 . 12|
|00003250| 0d 13 10 30 e7 20 49 25 | 3d 37 20 8c 20 e6 20 30 |...0. I%|=7 . . 0|
|00003260| 20 3a 20 c8 93 20 c8 90 | 20 33 30 38 2c 33 36 30 | : .. ..| 308,360|
|00003270| 2c 37 30 30 2c 32 32 30 | 20 3a 20 59 3d 35 37 32 |,700,220| : Y=572|
|00003280| 0d 13 1a 3f f3 20 63 6f | 6c 20 3a 20 f2 66 6f 6e |...?. co|l : .fon|
|00003290| 74 28 58 2c 59 2c 63 6f | 6c 2c 44 24 28 49 25 29 |t(X,Y,co|l,D$(I%)|
|000032a0| 29 20 3a 20 f2 66 6f 6e | 74 28 58 2b 35 30 30 2c |) : .fon|t(X+500,|
|000032b0| 59 2c 63 6f 6c 2c c3 28 | 44 28 49 25 29 29 29 0d |Y,col,.(|D(I%))).|
|000032c0| 13 24 27 e7 20 44 28 49 | 25 29 3c 34 20 8c 20 4e |.$'. D(I|%)<4 . N|
|000032d0| 25 3d 4e 25 2b 44 28 49 | 25 29 2d 34 20 3a 20 4a |%=N%+D(I|%)-4 : J|
|000032e0| 25 3d 4a 25 2b 31 0d 13 | 2e 18 59 2d 3d 33 36 20 |%=J%+1..|..Y-=36 |
|000032f0| 3a 20 57 3d a6 28 31 30 | 30 29 20 3a 20 ed 0d 13 |: W=.(10|0) : ...|
|00003300| 38 0c e7 20 4a 25 3e 30 | 20 8c 0d 13 42 2a 20 20 |8.. J%>0| ...B*  |
|00003310| 20 20 20 3a 20 54 6c 3d | 94 28 28 4e 25 2f 4a 25 |   : Tl=|.((N%/J%|
|00003320| 29 2f 34 29 20 3a 20 e7 | 20 54 6c 3e 35 20 8c 20 |)/4) : .| Tl>5 . |
|00003330| 54 6c 3d 35 0d 13 4c 09 | cc 20 3a 20 e1 0d 13 56 |Tl=5..L.|. : ...V|
|00003340| 05 cd 0d 13 60 0d f2 63 | 6c 65 61 72 28 33 29 0d |....`..c|lear(3).|
|00003350| 13 6a 1d dc 20 38 2c 38 | 2c 38 2c 32 2c 32 2c 32 |.j.. 8,8|,8,2,2,2|
|00003360| 2c 33 2c 33 2c 35 2c 35 | 2c 36 2c 36 0d 13 74 31 |,3,3,5,5|,6,6..t1|
|00003370| f2 74 65 78 74 28 33 30 | 38 2c 37 30 38 2c 22 42 |.text(30|8,708,"B|
|00003380| 22 2c 22 53 54 41 52 42 | 41 53 45 20 43 4f 4e 54 |","STARB|ASE CONT|
|00003390| 52 4f 4c 20 52 45 50 4f | 52 54 3a 22 29 0d 13 7e |ROL REPO|RT:")..~|
|000033a0| 2d f2 74 65 78 74 28 33 | 30 38 2c 36 35 36 2c 22 |-.text(3|08,656,"|
|000033b0| 59 22 2c 22 45 53 54 49 | 4d 41 54 45 44 20 54 49 |Y","ESTI|MATED TI|
|000033c0| 4d 45 20 46 4f 52 20 41 | 22 29 0d 13 88 2f f2 74 |ME FOR A|").../.t|
|000033d0| 65 78 74 28 33 30 38 2c | 36 30 34 2c 22 59 22 2c |ext(308,|604,"Y",|
|000033e0| 22 43 4f 4d 50 4c 45 54 | 45 20 53 59 53 54 45 4d |"COMPLET|E SYSTEM|
|000033f0| 53 20 52 45 46 49 54 22 | 29 0d 13 92 33 f2 74 65 |S REFIT"|)...3.te|
|00003400| 78 74 28 33 30 38 2c 35 | 35 32 2c 22 59 22 2c 22 |xt(308,5|52,"Y","|
|00003410| 3a 20 22 2b c0 c3 28 54 | 6c 29 2c 34 29 2b 22 20 |: "+..(T|l),4)+" |
|00003420| 53 54 41 52 44 41 54 45 | 53 2e 22 29 0d 13 9c 2f |STARDATE|S.").../|
|00003430| f2 74 65 78 74 28 33 30 | 38 2c 35 30 30 2c 22 42 |.text(30|8,500,"B|
|00003440| 22 2c 22 50 52 4f 43 45 | 45 44 20 57 49 54 48 20 |","PROCE|ED WITH |
|00003450| 52 45 46 49 54 54 49 4e | 47 22 29 0d 13 a6 32 41 |REFITTIN|G")...2A|
|00003460| 24 3d a4 69 6e 70 75 74 | 56 61 72 69 6f 75 73 28 |$=.input|Various(|
|00003470| 33 30 38 2c 34 34 38 2c | 35 35 36 2c 34 34 38 2c |308,448,|556,448,|
|00003480| 22 42 22 2c 22 28 59 2d | 4e 29 3a 22 29 0d 13 b0 |"B","(Y-|N):")...|
|00003490| 12 e7 20 c0 41 24 2c 31 | 29 3d 22 59 22 20 8c 0d |.. .A$,1|)="Y" ..|
|000034a0| 13 ba 18 20 20 20 20 20 | 3a 20 4e 25 3d 34 20 3a |...     |: N%=4 :|
|000034b0| 20 54 3d 54 2b 54 6c 0d | 13 c4 09 cc 20 3a 20 e1 | T=T+Tl.|.... : .|
|000034c0| 0d 13 ce 05 cd 0d 13 d8 | 36 f2 63 6c 65 61 72 28 |........|6.clear(|
|000034d0| 33 29 20 3a 20 f2 74 65 | 78 74 28 33 30 38 2c 37 |3) : .te|xt(308,7|
|000034e0| 30 38 2c 22 42 22 2c 22 | 53 54 41 52 42 41 53 45 |08,"B","|STARBASE|
|000034f0| 20 43 4f 4e 54 52 4f 4c | 3a 22 29 0d 13 e2 2d f2 | CONTROL|:")...-.|
|00003500| 74 65 78 74 28 33 30 38 | 2c 36 35 36 2c 22 42 22 |text(308|,656,"B"|
|00003510| 2c 22 45 4e 47 49 4e 45 | 45 52 49 4e 47 20 52 45 |,"ENGINE|ERING RE|
|00003520| 50 4f 52 54 20 2d 22 29 | 0d 13 ec 0f e3 20 49 25 |PORT -")|..... I%|
|00003530| 3d 31 20 b8 20 31 32 0d | 13 f6 0e c8 95 20 44 28 |=1 . 12.|..... D(|
|00003540| 49 25 29 3c 34 0d 14 00 | 0b 44 28 49 25 29 3d 34 |I%)<4...|.D(I%)=4|
|00003550| 0d 14 0a 05 ce 0d 14 14 | 05 ed 0d 14 1e 11 f2 64 |........|.......d|
|00003560| 61 6d 61 67 65 52 65 70 | 6f 72 74 0d 14 28 2a 4d |amageRep|ort..(*M|
|00003570| 59 53 25 3d a3 20 3a 20 | 44 49 4c 25 3d a3 20 3a |YS%=. : |DIL%=. :|
|00003580| 20 4e 45 55 25 3d a3 20 | 3a 20 f2 75 70 64 61 74 | NEU%=. |: .updat|
|00003590| 65 54 69 6d 65 0d 14 32 | 2e f2 74 65 78 74 28 33 |eTime..2|..text(3|
|000035a0| 30 38 2c 36 30 34 2c 22 | 57 22 2c 22 41 4c 4c 20 |08,604,"|W","ALL |
|000035b0| 53 59 53 54 45 4d 53 20 | 4e 4f 57 20 46 55 4c 4c |SYSTEMS |NOW FULL|
|000035c0| 59 22 29 0d 14 3c 34 f2 | 74 65 78 74 28 33 30 38 |Y")..<4.|text(308|
|000035d0| 2c 35 35 32 2c 22 57 22 | 2c 22 46 55 4e 43 54 49 |,552,"W"|,"FUNCTI|
|000035e0| 4f 4e 41 4c 20 2e 2e 2e | 2e 2e 22 29 20 3a 20 57 |ONAL ...|..") : W|
|000035f0| 3d a6 28 31 30 30 29 0d | 14 46 05 e1 0d 14 50 05 |=.(100).|.F....P.|
|00003600| 3a 0d 14 5a 13 dd 20 f2 | 73 74 61 74 75 73 52 65 |:..Z.. .|statusRe|
|00003610| 70 6f 72 74 0d 14 64 0d | f2 63 6c 65 61 72 28 32 |port..d.|.clear(2|
|00003620| 29 0d 14 6e 19 58 3d 33 | 32 20 3a 20 59 3d 37 34 |)..n.X=3|2 : Y=74|
|00003630| 30 20 3a 20 f7 20 8d 54 | 76 55 0d 14 78 14 e3 20 |0 : . .T|vU..x.. |
|00003640| 61 3d 30 20 b8 20 36 20 | 3a 20 f3 20 61 24 0d 14 |a=0 . 6 |: . a$..|
|00003650| 82 0a c8 8e 20 61 20 ca | 0d 14 8c 19 c9 20 30 20 |.... a .|..... 0 |
|00003660| 3a 20 f2 66 6f 6e 74 28 | 58 2c 59 2c 32 2c 61 24 |: .font(|X,Y,2,a$|
|00003670| 29 0d 14 96 28 20 20 20 | 20 20 20 20 3a 20 f2 66 |)...(   |    : .f|
|00003680| 6f 6e 74 28 58 2c 59 2d | 33 32 2c 33 2c 22 3a 41 |ont(X,Y-|32,3,":A|
|00003690| 4c 44 45 56 52 4f 4e 22 | 29 0d 14 a0 19 c9 20 31 |LDEVRON"|)..... 1|
|000036a0| 20 3a 20 f2 66 6f 6e 74 | 28 58 2c 59 2c 36 2c 61 | : .font|(X,Y,6,a|
|000036b0| 24 29 0d 14 aa 26 20 20 | 20 20 20 20 20 3a 20 f2 |$)...&  |     : .|
|000036c0| 66 6f 6e 74 28 58 2c 59 | 2d 33 32 2c 33 2c 22 3a |font(X,Y|-32,3,":|
|000036d0| 22 2b c3 28 42 39 29 29 | 0d 14 b4 19 c9 20 32 20 |"+.(B9))|..... 2 |
|000036e0| 3a 20 f2 66 6f 6e 74 28 | 58 2c 59 2c 38 2c 61 24 |: .font(|X,Y,8,a$|
|000036f0| 29 0d 14 be 33 20 20 20 | 20 20 20 20 3a 20 f2 66 |)...3   |    : .f|
|00003700| 6f 6e 74 28 58 2c 59 2d | 33 32 2c 33 2c 22 3a 22 |ont(X,Y-|32,3,":"|
|00003710| 2b c3 28 28 a8 28 54 38 | 2d 54 29 2a 31 30 29 2f |+.((.(T8|-T)*10)/|
|00003720| 31 30 29 29 0d 14 c8 19 | c9 20 33 20 3a 20 f2 66 |10))....|. 3 : .f|
|00003730| 6f 6e 74 28 58 2c 59 2c | 31 2c 61 24 29 0d 14 d2 |ont(X,Y,|1,a$)...|
|00003740| 26 20 20 20 20 20 20 20 | 3a 20 f2 66 6f 6e 74 28 |&       |: .font(|
|00003750| 58 2c 59 2d 33 32 2c 33 | 2c 22 3a 22 2b c3 28 4b |X,Y-32,3|,":"+.(K|
|00003760| 39 29 29 0d 14 dc 19 c9 | 20 34 20 3a 20 f2 66 6f |9)).....| 4 : .fo|
|00003770| 6e 74 28 58 2c 59 2c 38 | 2c 61 24 29 0d 14 e6 25 |nt(X,Y,8|,a$)...%|
|00003780| 20 20 20 20 20 20 20 3a | 20 f2 66 6f 6e 74 28 58 |       :| .font(X|
|00003790| 2c 59 2d 33 32 2c 33 2c | 22 3a 22 2b c3 28 45 29 |,Y-32,3,|":"+.(E)|
|000037a0| 29 0d 14 f0 19 c9 20 35 | 20 3a 20 f2 66 6f 6e 74 |)..... 5| : .font|
|000037b0| 28 58 2c 59 2c 36 2c 61 | 24 29 0d 14 fa 25 20 20 |(X,Y,6,a|$)...%  |
|000037c0| 20 20 20 20 20 3a 20 f2 | 66 6f 6e 74 28 58 2c 59 |     : .|font(X,Y|
|000037d0| 2d 33 32 2c 33 2c 22 3a | 22 2b c3 28 53 29 29 0d |-32,3,":|"+.(S)).|
|000037e0| 15 04 19 c9 20 36 20 3a | 20 f2 66 6f 6e 74 28 58 |.... 6 :| .font(X|
|000037f0| 2c 59 2c 32 2c 61 24 29 | 0d 15 0e 25 20 20 20 20 |,Y,2,a$)|...%    |
|00003800| 20 20 20 3a 20 f2 66 6f | 6e 74 28 58 2c 59 2d 33 |   : .fo|nt(X,Y-3|
|00003810| 32 2c 33 2c 22 3a 22 2b | c3 28 50 29 29 0d 15 18 |2,3,":"+|.(P))...|
|00003820| 05 cb 0d 15 22 0d 59 2d | 3d 36 38 20 3a 20 ed 0d |....".Y-|=68 : ..|
|00003830| 15 2c 05 3a 0d 15 36 44 | dc 20 53 59 53 54 45 4d |.,.:..6D|. SYSTEM|
|00003840| 2c 53 54 41 52 42 41 53 | 45 53 2c 54 49 4d 45 20 |,STARBAS|ES,TIME |
|00003850| 4c 45 46 54 2c 4b 4c 49 | 4e 47 4f 4e 53 2c 45 4e |LEFT,KLI|NGONS,EN|
|00003860| 45 52 47 59 2c 44 45 46 | 4c 45 43 54 4f 52 2c 54 |ERGY,DEF|LECTOR,T|
|00003870| 4f 52 50 45 44 4f 45 53 | 0d 15 40 05 3a 0d 15 4a |ORPEDOES|..@.:..J|
|00003880| 05 e1 0d 15 54 05 3a 0d | 15 5e 10 dd 20 f2 70 68 |....T.:.|.^.. .ph|
|00003890| 6f 74 6f 6e 41 69 6d 0d | 15 68 0e e7 20 44 28 39 |otonAim.|.h.. D(9|
|000038a0| 29 3c 30 20 8c 0d 15 72 | 2d 20 20 20 20 20 3a 20 |)<0 ...r|-     : |
|000038b0| f2 66 6f 6e 74 28 33 32 | 34 2c 32 32 38 2c 31 2c |.font(32|4,228,1,|
|000038c0| 22 43 4f 4d 42 41 54 20 | 43 4f 4d 50 55 54 45 52 |"COMBAT |COMPUTER|
|000038d0| 22 29 0d 15 7c 2b 20 20 | 20 20 20 3a 20 f2 66 6f |")..|+  |   : .fo|
|000038e0| 6e 74 28 33 32 34 2c 31 | 39 32 2c 31 2c 22 49 53 |nt(324,1|92,1,"IS|
|000038f0| 20 44 4f 57 4e 20 2e 2e | 2e 2e 2e 22 29 0d 15 86 | DOWN ..|...")...|
|00003900| 0c 20 20 20 20 20 3a 20 | e1 0d 15 90 05 cd 0d 15 |.     : |........|
|00003910| 9a 0c e7 20 4b 33 3c 31 | 20 8c 0d 15 a4 1a 20 20 |... K3<1| .....  |
|00003920| 20 20 20 3a 20 f2 6e 6f | 4b 6c 69 6e 67 6f 6e 73 |   : .no|Klingons|
|00003930| 20 3a 20 e1 0d 15 ae 05 | cd 0d 15 b8 0d f2 63 6c | : .....|......cl|
|00003940| 65 61 72 28 33 29 0d 15 | c2 2f f2 74 65 78 74 28 |ear(3)..|./.text(|
|00003950| 33 30 38 2c 37 30 38 2c | 22 52 22 2c 22 41 49 4d |308,708,|"R","AIM|
|00003960| 49 4e 47 20 44 41 54 41 | 20 46 4f 52 20 45 4e 45 |ING DATA| FOR ENE|
|00003970| 4d 59 3a 22 29 0d 15 cc | 20 51 25 3d 36 34 38 20 |MY:")...| Q%=648 |
|00003980| 3a 20 e3 20 49 25 3d 31 | 20 b8 20 33 20 3a 20 50 |: . I%=1| . 3 : P|
|00003990| 25 3d 34 32 30 0d 15 d6 | 17 e7 20 4b 28 49 25 2c |%=420...|.. K(I%,|
|000039a0| 33 29 3c 3d 30 20 8c 20 | 8d 64 7e 55 0d 15 e0 29 |3)<=0 . |.d~U...)|
|000039b0| 43 31 3d 53 31 20 3a 20 | 41 3d 53 32 20 3a 20 57 |C1=S1 : |A=S2 : W|
|000039c0| 31 3d 4b 28 49 25 2c 31 | 29 20 3a 20 58 3d 4b 28 |1=K(I%,1|) : X=K(|
|000039d0| 49 25 2c 32 29 0d 15 ea | 23 f2 74 65 78 74 28 33 |I%,2)...|#.text(3|
|000039e0| 30 38 2c 51 25 2c 22 52 | 22 2c 22 28 22 2b c3 28 |08,Q%,"R|","("+.(|
|000039f0| 49 25 29 2b 22 29 22 29 | 0d 15 f4 0a e4 20 8d 54 |I%)+")")|..... .T|
|00003a00| 42 57 0d 15 fe 0f 51 25 | 2d 3d 31 31 36 20 3a 20 |BW....Q%|-=116 : |
|00003a10| ed 0d 16 08 05 e1 0d 16 | 12 05 3a 0d 16 1c 17 dd |........|..:.....|
|00003a20| 20 f2 63 6f 75 72 73 65 | 43 61 6c 63 75 6c 61 74 | .course|Calculat|
|00003a30| 6f 72 0d 16 26 0f e7 20 | 44 28 31 30 29 3c 30 20 |or..&.. |D(10)<0 |
|00003a40| 8c 0d 16 30 27 20 20 20 | 20 20 3a 20 f2 66 6f 6e |...0'   |  : .fon|
|00003a50| 74 28 31 30 38 34 2c 32 | 32 38 2c 31 2c 22 4e 41 |t(1084,2|28,1,"NA|
|00003a60| 56 20 43 4f 4d 50 22 29 | 0d 16 3a 27 20 20 20 20 |V COMP")|..:'    |
|00003a70| 20 3a 20 f2 66 6f 6e 74 | 28 31 30 38 34 2c 31 39 | : .font|(1084,19|
|00003a80| 32 2c 31 2c 22 44 49 53 | 41 42 4c 45 44 22 29 0d |2,1,"DIS|ABLED").|
|00003a90| 16 44 0c 20 20 20 20 20 | 3a 20 e1 0d 16 4e 05 cd |.D.     |: ...N..|
|00003aa0| 0d 16 58 14 f2 63 6c 65 | 61 72 28 33 29 20 3a 20 |..X..cle|ar(3) : |
|00003ab0| 53 25 3d 31 0d 16 62 2b | f2 74 65 78 74 28 33 30 |S%=1..b+|.text(30|
|00003ac0| 38 2c 37 30 38 2c 22 57 | 22 2c 22 43 4f 55 52 53 |8,708,"W|","COURS|
|00003ad0| 45 20 43 41 4c 43 55 4c | 41 54 4f 52 3a 22 29 0d |E CALCUL|ATOR:").|
|00003ae0| 16 6c 30 f2 74 65 78 74 | 28 33 30 38 2c 36 35 36 |.l0.text|(308,656|
|00003af0| 2c 22 47 22 2c 22 49 4e | 20 54 48 49 53 20 53 45 |,"G","IN| THIS SE|
|00003b00| 43 54 4f 52 20 4f 52 20 | 41 20 4e 45 57 22 29 0d |CTOR OR |A NEW").|
|00003b10| 16 76 3b 41 24 3d a4 69 | 6e 70 75 74 56 61 72 69 |.v;A$=.i|nputVari|
|00003b20| 6f 75 73 28 33 30 38 2c | 36 30 34 2c 37 37 32 2c |ous(308,|604,772,|
|00003b30| 36 30 34 2c 22 47 22 2c | 22 51 55 41 44 52 41 4e |604,"G",|"QUADRAN|
|00003b40| 54 20 28 53 2d 51 29 3a | 22 29 0d 16 80 22 42 24 |T (S-Q):|")..."B$|
|00003b50| 3d 22 22 20 3a 20 e7 20 | 41 24 3d 22 53 22 20 8c |="" : . |A$="S" .|
|00003b60| 20 42 24 3d 22 53 45 43 | 54 4f 52 22 0d 16 8a 23 | B$="SEC|TOR"...#|
|00003b70| e7 20 41 24 3d 22 51 22 | 20 8c 20 42 24 3d 22 51 |. A$="Q"| . B$="Q|
|00003b80| 55 41 44 52 41 4e 54 22 | 20 3a 20 53 25 3d 30 0d |UADRANT"| : S%=0.|
|00003b90| 16 94 25 e7 20 42 24 3d | 22 22 20 8c 20 57 3d a6 |..%. B$=|"" . W=.|
|00003ba0| 28 31 35 29 20 3a 20 f2 | 63 6c 65 61 72 28 33 29 |(15) : .|clear(3)|
|00003bb0| 20 3a 20 e1 0d 16 9e 24 | f2 74 65 78 74 28 33 30 | : ....$|.text(30|
|00003bc0| 38 2c 35 35 32 2c 22 59 | 22 2c 22 43 4f 4f 52 44 |8,552,"Y|","COORD|
|00003bd0| 49 4e 41 54 45 53 22 29 | 0d 16 a8 2c 58 3d a4 69 |INATES")|...,X=.i|
|00003be0| 6e 70 75 74 4e 75 6d 62 | 65 72 28 37 30 34 2c 35 |nputNumb|er(704,5|
|00003bf0| 35 32 2c 37 37 32 2c 35 | 35 32 2c 22 59 22 2c 22 |52,772,5|52,"Y","|
|00003c00| 58 3a 22 29 0d 16 b2 2d | 57 31 3d a4 69 6e 70 75 |X:")...-|W1=.inpu|
|00003c10| 74 4e 75 6d 62 65 72 28 | 37 30 34 2c 35 30 30 2c |tNumber(|704,500,|
|00003c20| 37 37 32 2c 35 30 30 2c | 22 59 22 2c 22 59 3a 22 |772,500,|"Y","Y:"|
|00003c30| 29 0d 16 bc 1f e7 20 58 | 3c 31 20 84 20 58 3e 38 |)..... X|<1 . X>8|
|00003c40| 20 84 20 57 31 3c 31 20 | 84 20 57 31 3e 38 20 8c | . W1<1 |. W1>8 .|
|00003c50| 0d 16 c6 22 20 20 20 20 | 20 3a 20 57 3d a6 28 31 |..."    | : W=.(1|
|00003c60| 35 29 20 3a 20 f2 63 6c | 65 61 72 28 33 29 20 3a |5) : .cl|ear(3) :|
|00003c70| 20 e1 0d 16 d0 05 cd 0d | 16 da 31 43 31 3d 53 31 | .......|..1C1=S1|
|00003c80| 20 3a 20 41 3d 53 32 20 | 3a 20 e7 20 42 24 3d 22 | : A=S2 |: . B$="|
|00003c90| 51 55 41 44 52 41 4e 54 | 22 20 8c 20 43 31 3d 51 |QUADRANT|" . C1=Q|
|00003ca0| 31 20 3a 20 41 3d 51 32 | 0d 16 e4 1c 50 25 3d 33 |1 : A=Q2|....P%=3|
|00003cb0| 30 38 20 3a 20 51 25 3d | 34 33 32 20 3a 20 e4 20 |08 : Q%=|432 : . |
|00003cc0| 8d 54 42 57 0d 16 ee 05 | e1 0d 16 f8 05 3a 0d 17 |.TBW....|.....:..|
|00003cd0| 02 13 58 3d 58 2d 41 20 | 3a 20 41 3d 43 31 2d 57 |..X=X-A |: A=C1-W|
|00003ce0| 31 0d 17 0c 12 e7 20 58 | 3c 30 20 8c 20 e5 20 8d |1..... X|<0 . . .|
|00003cf0| 74 44 57 0d 17 16 12 e7 | 20 41 3c 30 20 8c 20 e5 |tDW.....| A<0 . .|
|00003d00| 20 8d 64 4a 57 0d 17 20 | 12 e7 20 58 3e 30 20 8c | .dJW.. |.. X>0 .|
|00003d10| 20 e5 20 8d 54 7e 57 0d | 17 2a 12 e7 20 41 3d 30 | . .T~W.|.*.. A=0|
|00003d20| 20 8c 20 e5 20 8d 74 62 | 57 0d 17 34 05 3a 0d 17 | . . .tb|W..4.:..|
|00003d30| 3e 08 43 31 3d 30 0d 17 | 48 19 e7 20 94 28 58 29 |>.C1=0..|H.. .(X)|
|00003d40| 3c 3d 94 28 41 29 20 8c | 20 e5 20 8d 44 66 57 0d |<=.(A) .| . .DfW.|
|00003d50| 17 52 23 44 52 3d 43 31 | 2b 28 28 28 94 28 58 29 |.R#DR=C1|+(((.(X)|
|00003d60| 2d 94 28 41 29 29 2b 94 | 28 58 29 29 2f 94 28 58 |-.(A))+.|(X))/.(X|
|00003d70| 29 29 0d 17 5c 0a e5 20 | 8d 64 7c 57 0d 17 66 15 |))..\.. |.d|W..f.|
|00003d80| 44 52 3d 43 31 2b 28 94 | 28 58 29 2f 94 28 41 29 |DR=C1+(.|(X)/.(A)|
|00003d90| 29 0d 17 70 0a e5 20 8d | 64 7c 57 0d 17 7a 05 3a |)..p.. .|d|W..z.:|
|00003da0| 0d 17 84 12 e7 20 41 3e | 30 20 8c 20 e5 20 8d 74 |..... A>|0 . . .t|
|00003db0| 76 57 0d 17 8e 12 e7 20 | 58 3d 30 20 8c 20 e5 20 |vW..... |X=0 . . |
|00003dc0| 8d 64 4a 57 0d 17 98 05 | 3a 0d 17 a2 0d e7 20 58 |.dJW....|:..... X|
|00003dd0| 3d 30 20 8c 20 f8 0d 17 | ac 11 43 31 3d 34 20 3a |=0 . ...|..C1=4 :|
|00003de0| 20 e5 20 8d 44 48 57 0d | 17 b6 11 43 31 3d 36 20 | . .DHW.|...C1=6 |
|00003df0| 3a 20 e5 20 8d 64 54 57 | 0d 17 c0 05 3a 0d 17 ca |: . .dTW|....:...|
|00003e00| 08 43 31 3d 32 0d 17 d4 | 19 e7 20 94 28 58 29 3e |.C1=2...|.. .(X)>|
|00003e10| 3d 94 28 41 29 20 8c 20 | e5 20 8d 64 72 57 0d 17 |=.(A) . |. .drW..|
|00003e20| de 23 44 52 3d 43 31 2b | 28 28 28 94 28 41 29 2d |.#DR=C1+|(((.(A)-|
|00003e30| 94 28 58 29 29 2b 94 28 | 41 29 29 2f 94 28 41 29 |.(X))+.(|A))/.(A)|
|00003e40| 29 0d 17 e8 09 e5 8d 64 | 7c 57 0d 17 f2 15 44 52 |)......d||W....DR|
|00003e50| 3d 43 31 2b 28 94 28 41 | 29 2f 94 28 58 29 29 0d |=C1+(.(A|)/.(X)).|
|00003e60| 17 fc 0f 62 65 61 72 24 | 3d c3 28 44 52 29 0d 18 |...bear$|=.(DR)..|
|00003e70| 06 0c e7 20 53 25 3d 30 | 20 8c 0d 18 10 21 20 20 |... S%=0| ....!  |
|00003e80| 20 20 20 3a 20 64 69 73 | 74 24 3d c3 28 a8 28 b6 |   : dis|t$=.(.(.|
|00003e90| 28 58 2a 58 2b 41 2a 41 | 29 29 29 0d 18 1a 1e cc |(X*X+A*A|))).....|
|00003ea0| 20 3a 20 64 69 73 74 24 | 3d c3 28 b6 28 58 2a 58 | : dist$|=.(.(X*X|
|00003eb0| 2b 41 2a 41 29 2f 31 30 | 29 0d 18 24 05 cd 0d 18 |+A*A)/10|)..$....|
|00003ec0| 2e 2b f2 74 65 78 74 28 | 50 25 2c 51 25 2c 22 57 |.+.text(|P%,Q%,"W|
|00003ed0| 22 2c 22 42 45 41 52 49 | 4e 47 3a 20 20 22 2b c0 |","BEARI|NG:  "+.|
|00003ee0| 62 65 61 72 24 2c 34 29 | 29 0d 18 38 2e f2 74 65 |bear$,4)|)..8..te|
|00003ef0| 78 74 28 50 25 2c 51 25 | 2d 35 32 2c 22 57 22 2c |xt(P%,Q%|-52,"W",|
|00003f00| 22 44 49 53 54 41 4e 43 | 45 3a 20 22 2b c0 64 69 |"DISTANC|E: "+.di|
|00003f10| 73 74 24 2c 34 29 29 0d | 18 42 05 f8 0d 18 4c 05 |st$,4)).|.B....L.|
|00003f20| 3a 0d 18 56 0a dd 20 f2 | 72 6e 64 0d 18 60 15 52 |:..V.. .|rnd..`.R|
|00003f30| 31 3d b3 28 38 29 20 3a | 20 52 32 3d b3 28 38 29 |1=.(8) :| R2=.(8)|
|00003f40| 0d 18 6a 22 41 24 3d 22 | 22 20 3a 20 5a 31 3d 52 |..j"A$="|" : Z1=R|
|00003f50| 31 20 3a 20 5a 32 3d 52 | 32 20 3a 20 f2 63 68 65 |1 : Z2=R|2 : .che|
|00003f60| 63 6b 0d 18 74 11 e7 20 | 5a 33 3d 30 20 8c 20 8d |ck..t.. |Z3=0 . .|
|00003f70| 44 60 58 0d 18 7e 05 e1 | 0d 18 88 05 3a 0d 18 92 |D`X..~..|....:...|
|00003f80| 0c dd 20 f2 63 68 65 63 | 6b 0d 18 9c 20 5a 33 3d |.. .chec|k... Z3=|
|00003f90| 30 20 3a 20 e7 20 51 24 | 28 5a 31 2c 5a 32 29 3d |0 : . Q$|(Z1,Z2)=|
|00003fa0| 41 24 20 8c 20 5a 33 3d | 31 0d 18 a6 05 e1 0d 18 |A$ . Z3=|1.......|
|00003fb0| b0 05 3a 0d 18 ba 11 dd | 20 f2 68 79 70 65 72 50 |..:.....| .hyperP|
|00003fc0| 72 6f 62 65 0d 18 c4 0d | f2 63 6c 65 61 72 28 33 |robe....|.clear(3|
|00003fd0| 29 0d 18 ce 0e e7 20 44 | 28 33 29 3c 30 20 8c 0d |)..... D|(3)<0 ..|
|00003fe0| 18 d8 38 20 20 20 20 20 | 3a 20 f2 74 65 78 74 28 |..8     |: .text(|
|00003ff0| 33 30 38 2c 37 30 38 2c | 22 52 22 2c 22 48 59 50 |308,708,|"R","HYP|
|00004000| 45 52 50 52 4f 42 45 20 | 44 41 4d 41 47 45 44 20 |ERPROBE |DAMAGED |
|00004010| 2e 2e 2e 2e 2e 22 29 0d | 18 e2 0c 20 20 20 20 20 |.....").|...     |
|00004020| 3a 20 e1 0d 18 ec 05 cd | 0d 18 f6 0d e7 20 51 34 |: ......|..... Q4|
|00004030| 3c 3e 30 20 8c 0d 19 00 | 35 20 20 20 20 20 3a 20 |<>0 ....|5     : |
|00004040| f2 74 65 78 74 28 33 30 | 38 2c 37 30 38 2c 22 52 |.text(30|8,708,"R|
|00004050| 22 2c 22 48 59 50 45 52 | 50 52 4f 42 45 20 49 53 |","HYPER|PROBE IS|
|00004060| 20 41 4c 52 45 41 44 59 | 22 29 0d 19 0a 2e 20 20 | ALREADY|")....  |
|00004070| 20 20 20 3a 20 f2 74 65 | 78 74 28 33 30 38 2c 36 |   : .te|xt(308,6|
|00004080| 35 36 2c 22 52 22 2c 22 | 4c 41 55 4e 43 48 45 44 |56,"R","|LAUNCHED|
|00004090| 20 2e 2e 2e 2e 2e 22 29 | 0d 19 14 0c 20 20 20 20 | .....")|....    |
|000040a0| 20 3a 20 e1 0d 19 1e 05 | cd 0d 19 28 2d f2 74 65 | : .....|...(-.te|
|000040b0| 78 74 28 33 30 38 2c 37 | 30 38 2c 22 59 22 2c 22 |xt(308,7|08,"Y","|
|000040c0| 4c 41 55 4e 43 48 20 48 | 59 50 45 52 50 52 4f 42 |LAUNCH H|YPERPROB|
|000040d0| 45 20 54 4f 22 29 0d 19 | 32 23 f2 74 65 78 74 28 |E TO")..|2#.text(|
|000040e0| 33 30 38 2c 36 35 36 2c | 22 59 22 2c 22 51 55 41 |308,656,|"Y","QUA|
|000040f0| 44 52 41 4e 54 20 2d 22 | 29 0d 19 3c 2d 51 35 3d |DRANT -"|)..<-Q5=|
|00004100| a4 69 6e 70 75 74 4e 75 | 6d 62 65 72 28 36 32 30 |.inputNu|mber(620|
|00004110| 2c 36 30 34 2c 36 38 30 | 2c 36 30 34 2c 22 57 22 |,604,680|,604,"W"|
|00004120| 2c 22 58 3a 22 29 0d 19 | 46 2d 51 34 3d a4 69 6e |,"X:")..|F-Q4=.in|
|00004130| 70 75 74 4e 75 6d 62 65 | 72 28 36 32 30 2c 35 35 |putNumbe|r(620,55|
|00004140| 32 2c 36 38 30 2c 35 35 | 32 2c 22 57 22 2c 22 59 |2,680,55|2,"W","Y|
|00004150| 3a 22 29 0d 19 50 21 e7 | 20 51 34 3c 31 20 84 20 |:")..P!.| Q4<1 . |
|00004160| 51 34 3e 38 20 84 20 51 | 35 3c 31 20 84 20 51 35 |Q4>8 . Q|5<1 . Q5|
|00004170| 3e 38 20 8c 0d 19 5a 37 | 20 20 20 20 20 3a 20 f2 |>8 ...Z7|     : .|
|00004180| 74 65 78 74 28 33 30 38 | 2c 34 34 38 2c 22 52 22 |text(308|,448,"R"|
|00004190| 2c 22 48 59 50 45 52 50 | 52 4f 42 45 20 49 53 20 |,"HYPERP|ROBE IS |
|000041a0| 4e 4f 57 20 4f 4e 20 41 | 4e 22 29 0d 19 64 39 20 |NOW ON A|N")..d9 |
|000041b0| 20 20 20 20 3a 20 f2 74 | 65 78 74 28 33 30 38 2c |    : .t|ext(308,|
|000041c0| 33 39 36 2c 22 52 22 2c | 22 49 52 52 45 54 52 49 |396,"R",|"IRRETRI|
|000041d0| 45 56 41 42 4c 45 20 54 | 52 41 4a 45 43 54 4f 52 |EVABLE T|RAJECTOR|
|000041e0| 59 2e 22 29 0d 19 6e 14 | 20 20 20 20 20 3a 20 51 |Y.")..n.|     : Q|
|000041f0| 34 3d 2d 31 20 3a 20 e1 | 0d 19 78 05 cd 0d 19 82 |4=-1 : .|..x.....|
|00004200| 2f f2 74 65 78 74 28 33 | 30 38 2c 34 34 38 2c 22 |/.text(3|08,448,"|
|00004210| 57 22 2c 22 48 59 50 45 | 52 50 52 4f 42 45 20 4c |W","HYPE|RPROBE L|
|00004220| 41 55 4e 43 48 45 44 20 | 54 4f 22 29 0d 19 8c 3b |AUNCHED |TO")...;|
|00004230| f2 74 65 78 74 28 33 30 | 38 2c 33 39 36 2c 22 57 |.text(30|8,396,"W|
|00004240| 22 2c 22 51 55 41 44 52 | 41 4e 54 20 22 2b c3 28 |","QUADR|ANT "+.(|
|00004250| 51 35 29 2b 22 2e 22 2b | c3 28 51 34 29 2b 22 20 |Q5)+"."+|.(Q4)+" |
|00004260| 2e 2e 2e 2e 2e 22 29 0d | 19 96 0e 5a 25 3d 56 25 |.....").|...Z%=V%|
|00004270| 2b b3 28 39 29 0d 19 a0 | 05 e1 0d 19 aa 05 3a 0d |+.(9)...|......:.|
|00004280| 19 b4 10 dd 20 f2 73 75 | 70 65 72 4e 6f 76 61 0d |.... .su|perNova.|
|00004290| 19 be 19 f2 63 6c 65 61 | 72 28 31 29 20 3a 20 f2 |....clea|r(1) : .|
|000042a0| 63 6c 65 61 72 28 32 29 | 0d 19 c8 37 f2 74 65 78 |clear(2)|...7.tex|
|000042b0| 74 28 32 34 2c 37 36 38 | 2c 22 52 22 2c 22 59 4f |t(24,768|,"R","YO|
|000042c0| 55 20 48 41 56 45 20 45 | 4e 54 45 52 45 44 20 41 |U HAVE E|NTERED A|
|000042d0| 20 53 55 50 45 52 4e 4f | 56 41 20 49 4e 22 29 0d | SUPERNO|VA IN").|
|000042e0| 19 d2 3a f2 74 65 78 74 | 28 32 34 2c 37 30 38 2c |..:.text|(24,708,|
|000042f0| 22 52 22 2c 22 51 55 41 | 44 52 41 4e 54 20 22 2b |"R","QUA|DRANT "+|
|00004300| c3 28 51 32 29 2b 22 2e | 22 2b c3 28 51 31 29 2b |.(Q2)+".|"+.(Q1)+|
|00004310| 22 20 2e 2e 2e 2e 2e 22 | 29 0d 19 dc 0c f2 64 65 |" ....."|).....de|
|00004320| 61 64 28 32 29 0d 19 e6 | 05 e1 0d 19 f0 05 3a 0d |ad(2)...|......:.|
|00004330| 19 fa 0b dd 20 f2 6e 6f | 76 61 0d 1a 04 1a f2 72 |.... .no|va.....r|
|00004340| 6e 64 20 3a 20 e7 20 5a | 31 3c 3e 51 31 20 8c 20 |nd : . Z|1<>Q1 . |
|00004350| 8d 54 58 5a 0d 1a 0e 11 | e7 20 5a 32 3d 51 32 20 |.TXZ....|. Z2=Q2 |
|00004360| 8c 8d 54 44 5a 0d 1a 18 | 18 e7 20 47 28 5a 31 2c |..TDZ...|.. G(Z1,|
|00004370| 5a 32 29 3d 2d 31 20 8c | 20 8d 54 44 5a 0d 1a 22 |Z2)=-1 .| .TDZ.."|
|00004380| 1c 58 3d 47 28 5a 31 2c | 5a 32 29 2f 31 30 30 20 |.X=G(Z1,|Z2)/100 |
|00004390| 3a 20 58 31 3d a8 28 58 | 29 0d 1a 2c 41 f2 70 72 |: X1=.(X|)..,A.pr|
|000043a0| 69 6e 74 65 72 28 32 2c | 22 57 22 2c 22 43 4f 4d |inter(2,|"W","COM|
|000043b0| 4d 55 4e 49 43 41 54 49 | 4f 4e 53 20 4f 46 46 49 |MUNICATI|ONS OFFI|
|000043c0| 43 45 52 20 52 45 50 4f | 52 54 49 4e 47 3a 22 29 |CER REPO|RTING:")|
|000043d0| 20 3a 20 57 3d a6 28 38 | 30 29 0d 1a 36 44 f2 70 | : W=.(8|0)..6D.p|
|000043e0| 72 69 6e 74 65 72 28 32 | 2c 22 57 22 2c 22 53 50 |rinter(2|,"W","SP|
|000043f0| 41 43 45 20 57 41 54 43 | 48 20 48 41 53 20 52 45 |ACE WATC|H HAS RE|
|00004400| 50 4f 52 54 45 44 20 41 | 20 53 55 50 45 52 4e 4f |PORTED A| SUPERNO|
|00004410| 56 41 22 29 20 3a 20 57 | 3d a6 28 34 30 29 0d 1a |VA") : W|=.(40)..|
|00004420| 40 3b f2 70 72 69 6e 74 | 65 72 28 32 2c 22 57 22 |@;.print|er(2,"W"|
|00004430| 2c 22 49 4e 20 51 55 41 | 44 52 41 4e 54 20 22 2b |,"IN QUA|DRANT "+|
|00004440| c3 28 5a 32 29 2b 22 2e | 22 2b c3 28 5a 31 29 2b |.(Z2)+".|"+.(Z1)+|
|00004450| 22 20 2e 2e 2e 2e 2e 22 | 29 0d 1a 4a 45 57 3d a6 |" ....."|)..JEW=.|
|00004460| 28 34 30 29 20 3a 20 f2 | 70 72 69 6e 74 65 72 28 |(40) : .|printer(|
|00004470| 32 2c 22 52 22 2c 22 44 | 4f 20 4e 4f 54 20 45 4e |2,"R","D|O NOT EN|
|00004480| 54 45 52 20 41 54 20 53 | 55 42 20 4c 49 47 48 54 |TER AT S|UB LIGHT|
|00004490| 20 53 50 45 45 44 20 2e | 2e 2e 2e 2e 22 29 0d 1a | SPEED .|....")..|
|000044a0| 54 12 e7 20 58 31 3c 3d | 30 20 e5 20 8d 44 7c 5a |T.. X1<=|0 . .D|Z|
|000044b0| 0d 1a 5e 25 57 3d a6 28 | 34 30 29 20 3a 20 41 24 |..^%W=.(|40) : A$|
|000044c0| 3d 22 22 20 3a 20 e7 20 | 58 31 3e 31 20 8c 20 41 |="" : . |X1>1 . A|
|000044d0| 24 3d 22 53 22 0d 1a 68 | 3a f2 70 72 69 6e 74 65 |$="S"..h|:.printe|
|000044e0| 72 28 32 2c 22 59 22 2c | c3 28 58 31 29 2b 22 20 |r(2,"Y",|.(X1)+" |
|000044f0| 4b 4c 49 4e 47 4f 4e 22 | 2b 41 24 2b 22 20 44 45 |KLINGON"|+A$+" DE|
|00004500| 53 54 52 4f 59 45 44 20 | 2e 2e 2e 2e 2e 22 29 0d |STROYED |.....").|
|00004510| 1a 72 25 4b 39 3d 4b 39 | 2d 58 31 20 3a 20 e7 20 |.r%K9=K9|-X1 : . |
|00004520| 4b 39 3c 3d 30 20 8c 20 | f2 64 65 61 64 28 34 29 |K9<=0 . |.dead(4)|
|00004530| 20 3a 20 e1 0d 1a 7c 18 | e7 20 31 30 2a 28 58 2d | : ...|.|. 10*(X-|
|00004540| 58 31 29 3c 31 20 8c 20 | 8d 74 5a 5a 0d 1a 86 38 |X1)<1 . |.tZZ...8|
|00004550| 57 3d a6 28 34 30 29 20 | 3a 20 f2 70 72 69 6e 74 |W=.(40) |: .print|
|00004560| 65 72 28 32 2c 22 59 22 | 2c 22 53 54 41 52 42 41 |er(2,"Y"|,"STARBA|
|00004570| 53 45 20 44 45 53 54 52 | 4f 59 45 44 20 2e 2e 2e |SE DESTR|OYED ...|
|00004580| 2e 2e 22 29 0d 1a 90 0b | 42 39 3d 42 39 2d 31 0d |..")....|B9=B9-1.|
|00004590| 1a 9a 1d 47 28 5a 31 2c | 5a 32 29 3d 2d 31 20 3a |...G(Z1,|Z2)=-1 :|
|000045a0| 20 5a 28 5a 31 2c 5a 32 | 29 3d 2d 31 0d 1a a4 17 | Z(Z1,Z2|)=-1....|
|000045b0| 57 3d a6 28 34 30 29 20 | 3a 20 f2 63 6c 65 61 72 |W=.(40) |: .clear|
|000045c0| 28 36 29 0d 1a ae 05 e1 | 0d 1a b8 05 3a 0d 1a c2 |(6).....|....:...|
|000045d0| 12 dd 20 f2 70 72 6f 62 | 65 52 65 74 75 72 6e 0d |.. .prob|eReturn.|
|000045e0| 1a cc 1c ea 20 41 2c 42 | 2c 43 2c 58 2c 59 20 3a |.... A,B|,C,X,Y :|
|000045f0| 20 e7 20 51 34 3c 31 20 | 8c 20 e1 0d 1a d6 1b f2 | . Q4<1 |. ......|
|00004600| 63 6c 65 61 72 28 33 29 | 20 3a 20 4e 25 3d 47 28 |clear(3)| : N%=G(|
|00004610| 51 34 2c 51 35 29 0d 1a | e0 0c e7 20 4e 25 3c 30 |Q4,Q5)..|... N%<0|
|00004620| 20 8c 0d 1a ea 37 20 20 | 20 20 20 3a 20 f2 74 65 | ....7  |   : .te|
|00004630| 78 74 28 33 30 38 2c 37 | 30 38 2c 22 52 22 2c 22 |xt(308,7|08,"R","|
|00004640| 43 4f 4e 54 41 43 54 20 | 57 49 54 48 20 48 59 50 |CONTACT |WITH HYP|
|00004650| 45 52 50 52 4f 42 45 22 | 29 0d 1a f4 33 20 20 20 |ERPROBE"|)...3   |
|00004660| 20 20 3a 20 f2 74 65 78 | 74 28 33 30 38 2c 36 35 |  : .tex|t(308,65|
|00004670| 36 2c 22 52 22 2c 22 48 | 41 53 20 42 45 45 4e 20 |6,"R","H|AS BEEN |
|00004680| 4c 4f 53 54 20 2e 2e 2e | 2e 2e 22 29 0d 1a fe 14 |LOST ...|..")....|
|00004690| 20 20 20 20 20 3a 20 51 | 34 3d 2d 31 20 3a 20 e1 |     : Q|4=-1 : .|
|000046a0| 0d 1b 08 05 cd 0d 1b 12 | 30 f2 74 65 78 74 28 33 |........|0.text(3|
|000046b0| 30 38 2c 37 30 38 2c 22 | 57 22 2c 22 48 59 50 45 |08,708,"|W","HYPE|
|000046c0| 52 50 52 4f 42 45 20 48 | 41 53 20 52 45 54 55 52 |RPROBE H|AS RETUR|
|000046d0| 4e 45 44 22 29 0d 1b 1c | 40 f2 74 65 78 74 28 33 |NED")...|@.text(3|
|000046e0| 30 38 2c 36 35 36 2c 22 | 57 22 2c 22 46 52 4f 4d |08,656,"|W","FROM|
|000046f0| 20 51 55 41 44 52 41 4e | 54 20 22 2b c3 28 51 35 | QUADRAN|T "+.(Q5|
|00004700| 29 2b 22 2e 22 2b c3 28 | 51 34 29 2b 22 20 2e 2e |)+"."+.(|Q4)+" ..|
|00004710| 2e 2e 2e 22 29 0d 1b 26 | 1b 59 3d 35 36 30 20 3a |...")..&|.Y=560 :|
|00004720| 20 e3 20 41 3d 51 34 2d | 31 20 b8 20 51 34 2b 31 | . A=Q4-|1 . Q4+1|
|00004730| 0d 1b 30 24 58 3d 33 30 | 38 20 3a 20 4e 28 31 29 |..0$X=30|8 : N(1)|
|00004740| 3d 30 20 3a 20 4e 28 32 | 29 3d 30 20 3a 20 4e 28 |=0 : N(2|)=0 : N(|
|00004750| 33 29 3d 30 0d 1b 3a 13 | e3 20 42 3d 51 35 2d 31 |3)=0..:.|. B=Q5-1|
|00004760| 20 b8 20 51 35 2b 31 0d | 1b 44 3e e7 20 41 3e 30 | . Q5+1.|.D>. A>0|
|00004770| 20 80 20 41 3c 39 20 80 | 20 42 3e 30 20 80 20 42 | . A<9 .| B>0 . B|
|00004780| 3c 39 20 8c 20 4e 28 42 | 2d 51 35 2b 32 29 3d 47 |<9 . N(B|-Q5+2)=G|
|00004790| 28 41 2c 42 29 20 3a 20 | 5a 28 41 2c 42 29 3d 47 |(A,B) : |Z(A,B)=G|
|000047a0| 28 41 2c 42 29 0d 1b 4e | 05 ed 0d 1b 58 0d e3 20 |(A,B)..N|....X.. |
|000047b0| 43 3d 31 20 b8 20 33 0d | 1b 62 1a e6 20 38 20 3a |C=1 . 3.|.b.. 8 :|
|000047c0| 20 c8 93 20 c8 90 20 58 | 2c 59 2c 32 32 30 2c 38 | .. .. X|,Y,220,8|
|000047d0| 34 0d 1b 6c 1e e6 20 30 | 20 3a 20 c8 93 20 c8 90 |4..l.. 0| : .. ..|
|000047e0| 20 58 2b 34 2c 59 2b 34 | 2c 32 31 32 2c 37 36 0d | X+4,Y+4|,212,76.|
|000047f0| 1b 76 33 e7 20 4e 28 43 | 29 3d 30 20 20 8c 20 f2 |.v3. N(C|)=0  . .|
|00004800| 74 65 78 74 28 58 2b 32 | 36 2c 59 2b 31 32 2c 22 |text(X+2|6,Y+12,"|
|00004810| 57 22 2c 22 20 20 20 22 | 29 20 3a 20 e5 20 8d 74 |W","   "|) : . .t|
|00004820| 72 5b 0d 1b 80 35 e7 20 | 4e 28 43 29 3d 2d 31 20 |r[...5. |N(C)=-1 |
|00004830| 8c 20 f2 74 65 78 74 28 | 58 2b 33 32 2c 59 2b 31 |. .text(|X+32,Y+1|
|00004840| 32 2c 22 59 22 2c 22 2a | 20 2a 20 2a 22 29 20 3a |2,"Y","*| * *") :|
|00004850| 20 e5 20 8d 74 72 5b 0d | 1b 8a 17 71 24 3d c2 c3 | . .tr[.|...q$=..|
|00004860| 28 4e 28 43 29 2b 31 30 | 30 30 29 2c 33 29 0d 1b |(N(C)+10|00),3)..|
|00004870| 94 28 6b 24 3d c0 71 24 | 2c 31 29 20 20 3a 20 f2 |.(k$=.q$|,1)  : .|
|00004880| 74 65 78 74 28 58 2b 33 | 32 2c 59 2b 32 34 2c 22 |text(X+3|2,Y+24,"|
|00004890| 52 22 2c 6b 24 29 0d 1b | 9e 29 73 24 3d c1 71 24 |R",k$)..|.)s$=.q$|
|000048a0| 2c 32 2c 31 29 20 3a 20 | f2 74 65 78 74 28 58 2b |,2,1) : |.text(X+|
|000048b0| 39 36 2c 59 2b 32 34 2c | 22 42 22 2c 73 24 29 0d |96,Y+24,|"B",s$).|
|000048c0| 1b a8 28 70 24 3d c2 71 | 24 2c 31 29 20 3a 20 f2 |..(p$=.q|$,1) : .|
|000048d0| 74 65 78 74 28 58 2b 31 | 36 30 2c 59 2b 32 34 2c |text(X+1|60,Y+24,|
|000048e0| 22 59 22 2c 70 24 29 0d | 1b b2 0e 58 2b 3d 32 33 |"Y",p$).|...X+=23|
|000048f0| 32 20 3a 20 ed 0d 1b bc | 0e 59 2d 3d 39 36 20 20 |2 : ....|.Y-=96  |
|00004900| 3a 20 ed 0d 1b c6 08 51 | 34 3d 30 0d 1b d0 05 e1 |: .....Q|4=0.....|
|00004910| 0d 1b da 05 3a 0d 1b e4 | 12 dd 20 f2 73 63 61 6e |....:...|.. .scan|
|00004920| 6e 65 72 49 6e 66 6f 0d | 1b ee 1c e7 20 4b 33 3c |nerInfo.|.... K3<|
|00004930| 31 20 8c 20 f2 6e 6f 4b | 6c 69 6e 67 6f 6e 73 20 |1 . .noK|lingons |
|00004940| 3a 20 e1 0d 1b f8 0e e7 | 20 44 28 39 29 3c 30 20 |: ......| D(9)<0 |
|00004950| 8c 0d 1c 02 2d 20 20 20 | 20 20 3a 20 f2 66 6f 6e |....-   |  : .fon|
|00004960| 74 28 33 32 34 2c 32 32 | 38 2c 31 2c 22 43 4f 4d |t(324,22|8,1,"COM|
|00004970| 42 41 54 20 43 4f 4d 50 | 55 54 45 52 22 29 0d 1c |BAT COMP|UTER")..|
|00004980| 0c 2b 20 20 20 20 20 3a | 20 f2 66 6f 6e 74 28 33 |.+     :| .font(3|
|00004990| 32 34 2c 31 39 32 2c 31 | 2c 22 49 53 20 44 4f 57 |24,192,1|,"IS DOW|
|000049a0| 4e 20 2e 2e 2e 2e 2e 22 | 29 0d 1c 16 0c 20 20 20 |N ....."|)....   |
|000049b0| 20 20 3a 20 e1 0d 1c 20 | 05 cd 0d 1c 2a 0d f2 63 |  : ... |....*..c|
|000049c0| 6c 65 61 72 28 33 29 0d | 1c 34 2e f2 74 65 78 74 |lear(3).|.4..text|
|000049d0| 28 33 30 38 2c 37 30 38 | 2c 22 52 22 2c 22 4b 4c |(308,708|,"R","KL|
|000049e0| 49 4e 47 4f 4e 20 46 4f | 52 43 45 20 53 54 41 54 |INGON FO|RCE STAT|
|000049f0| 55 53 3a 22 29 0d 1c 3e | 41 f2 74 65 78 74 28 33 |US:")..>|A.text(3|
|00004a00| 30 38 2c 36 35 36 2c 22 | 59 22 2c 22 53 45 43 54 |08,656,"|Y","SECT|
|00004a10| 4f 52 3a 22 29 20 3a 20 | f2 74 65 78 74 28 36 30 |OR:") : |.text(60|
|00004a20| 38 2c 36 35 36 2c 22 59 | 22 2c 22 53 54 52 45 4e |8,656,"Y|","STREN|
|00004a30| 47 54 48 3a 22 29 0d 1c | 48 13 50 25 3d 33 30 38 |GTH:")..|H.P%=308|
|00004a40| 20 3a 20 51 25 3d 36 30 | 34 0d 1c 52 0f e3 20 49 | : Q%=60|4..R.. I|
|00004a50| 25 3d 31 20 b8 20 4b 33 | 0d 1c 5c 2e f2 74 65 78 |%=1 . K3|..\..tex|
|00004a60| 74 28 50 25 2c 51 25 2c | 22 57 22 2c c3 28 4b 28 |t(P%,Q%,|"W",.(K(|
|00004a70| 49 25 2c 32 29 29 2b 22 | 2e 22 2b c3 28 4b 28 49 |I%,2))+"|."+.(K(I|
|00004a80| 25 2c 31 29 29 29 0d 1c | 66 2d f2 74 65 78 74 28 |%,1)))..|f-.text(|
|00004a90| 50 25 2b 33 30 30 2c 51 | 25 2c 22 57 22 2c c3 28 |P%+300,Q|%,"W",.(|
|00004aa0| 4b 28 49 25 2c 33 29 29 | 2b 22 20 55 4e 49 54 53 |K(I%,3))|+" UNITS|
|00004ab0| 2e 22 29 0d 1c 70 0b 51 | 25 2d 3d 31 32 30 0d 1c |.")..p.Q|%-=120..|
|00004ac0| 7a 05 ed 0d 1c 84 05 e1 | 0d 1c 8e 05 3a 0d 1c 98 |z.......|....:...|
|00004ad0| 0d dd 20 f2 72 65 70 6f | 72 74 0d 1c a2 15 ea 20 |.. .repo|rt..... |
|00004ae0| 49 25 2c 54 2c 57 2c 41 | 24 20 3a 20 54 3d 30 0d |I%,T,W,A|$ : T=0.|
|00004af0| 1c ac 0f e3 20 49 25 3d | 31 20 b8 20 31 32 0d 1c |.... I%=|1 . 12..|
|00004b00| b6 13 e7 20 44 28 49 25 | 29 3c 30 20 8c 20 54 3d |... D(I%|)<0 . T=|
|00004b10| 31 0d 1c c0 05 ed 0d 1c | ca 0b e7 20 54 3d 31 20 |1.......|... T=1 |
|00004b20| 8c 0d 1c d4 42 20 20 20 | 20 20 3a 20 f2 63 6c 65 |....B   |  : .cle|
|00004b30| 61 72 28 36 29 20 3a 20 | f2 70 72 69 6e 74 65 72 |ar(6) : |.printer|
|00004b40| 28 32 2c 22 57 22 2c 22 | 44 41 4d 41 47 45 20 43 |(2,"W","|DAMAGE C|
|00004b50| 4f 4e 54 52 4f 4c 20 52 | 45 50 4f 52 54 49 4e 47 |ONTROL R|EPORTING|
|00004b60| 3a 22 29 0d 1c de 12 20 | 20 20 20 20 3a 20 57 3d |:").... |    : W=|
|00004b70| a6 28 32 30 29 0d 1c e8 | 05 cd 0d 1c f2 0f e3 20 |.(20)...|....... |
|00004b80| 49 25 3d 31 20 b8 20 31 | 32 0d 1c fc 18 e7 20 49 |I%=1 . 1|2..... I|
|00004b90| 25 3d 37 20 80 20 44 49 | 4c 25 20 8c 20 8d 44 42 |%=7 . DI|L% . .DB|
|00004ba0| 5d 0d 1d 06 18 e7 20 49 | 25 3d 36 20 80 20 4e 45 |]..... I|%=6 . NE|
|00004bb0| 55 25 20 8c 20 8d 44 42 | 5d 0d 1d 10 15 e7 20 44 |U% . .DB|]..... D|
|00004bc0| 28 49 25 29 3e 3d 30 20 | 8c 20 8d 44 42 5d 0d 1d |(I%)>=0 |. .DB]..|
|00004bd0| 1a 1e 41 24 3d 22 20 42 | 45 49 4e 47 20 52 45 50 |..A$=" B|EING REP|
|00004be0| 41 49 52 45 44 20 2e 2e | 2e 2e 2e 22 0d 1d 24 11 |AIRED ..|..."..$.|
|00004bf0| 44 28 49 25 29 3d 44 28 | 49 25 29 2b 31 0d 1d 2e |D(I%)=D(|I%)+1...|
|00004c00| 27 e7 20 44 28 49 25 29 | 3e 3d 30 20 8c 20 41 24 |'. D(I%)|>=0 . A$|
|00004c10| 3d 22 20 4e 4f 57 20 4f | 50 45 52 41 54 49 4f 4e |=" NOW O|PERATION|
|00004c20| 41 4c 2e 22 0d 1d 38 27 | f2 70 72 69 6e 74 65 72 |AL."..8'|.printer|
|00004c30| 28 32 2c 22 57 22 2c 44 | 24 28 49 25 29 2b 41 24 |(2,"W",D|$(I%)+A$|
|00004c40| 29 20 3a 20 57 3d a6 28 | 32 30 29 0d 1d 42 11 ed |) : W=.(|20)..B..|
|00004c50| 20 3a 20 f2 63 6c 65 61 | 72 28 36 29 0d 1d 4c 05 | : .clea|r(6)..L.|
|00004c60| e1 0d 1d 56 05 3a 0d 1d | 60 0b dd 20 f2 6d 6f 76 |...V.:..|`.. .mov|
|00004c70| 65 0d 1d 6a 1b 5a 31 3d | 4b 28 49 25 2c 31 29 20 |e..j.Z1=|K(I%,1) |
|00004c80| 3a 20 5a 32 3d 4b 28 49 | 25 2c 32 29 0d 1d 74 17 |: Z2=K(I|%,2)..t.|
|00004c90| e7 20 53 31 2d 5a 31 3e | 30 20 8c 20 5a 31 3d 5a |. S1-Z1>|0 . Z1=Z|
|00004ca0| 31 2b 31 0d 1d 7e 17 e7 | 20 53 32 2d 5a 32 3e 30 |1+1..~..| S2-Z2>0|
|00004cb0| 20 8c 20 5a 32 3d 5a 32 | 2b 31 0d 1d 88 17 e7 20 | . Z2=Z2|+1..... |
|00004cc0| 53 31 2d 5a 31 3c 30 20 | 8c 20 5a 31 3d 5a 31 2d |S1-Z1<0 |. Z1=Z1-|
|00004cd0| 31 0d 1d 92 17 e7 20 53 | 32 2d 5a 32 3c 30 20 8c |1..... S|2-Z2<0 .|
|00004ce0| 20 5a 32 3d 5a 32 2d 31 | 0d 1d 9c 1f 41 24 3d 22 | Z2=Z2-1|....A$="|
|00004cf0| 22 20 3a 20 f2 63 68 65 | 63 6b 20 3a 20 e7 20 5a |" : .che|ck : . Z|
|00004d00| 33 3d 30 20 8c 20 e1 0d | 1d a6 1a 51 24 28 4b 28 |3=0 . ..|...Q$(K(|
|00004d10| 49 25 2c 31 29 2c 4b 28 | 49 25 2c 32 29 29 3d 22 |I%,1),K(|I%,2))="|
|00004d20| 22 0d 1d b0 31 4b 28 49 | 25 2c 31 29 3d 5a 31 20 |"...1K(I|%,1)=Z1 |
|00004d30| 3a 20 4b 28 49 25 2c 32 | 29 3d 5a 32 20 3a 20 51 |: K(I%,2|)=Z2 : Q|
|00004d40| 24 28 5a 31 2c 5a 32 29 | 3d 22 6b 6c 69 6e 67 6f |$(Z1,Z2)|="klingo|
|00004d50| 6e 22 0d 1d ba 05 e1 0d | 1d c4 05 3a 0d 1d ce 0b |n"......|...:....|
|00004d60| dd 20 a4 44 28 44 29 0d | 1d d8 25 3d b6 28 28 4b |. .D(D).|..%=.((K|
|00004d70| 28 49 25 2c 31 29 2d 53 | 31 29 5e 32 2b 28 4b 28 |(I%,1)-S|1)^2+(K(|
|00004d80| 49 25 2c 32 29 2d 53 32 | 29 5e 32 29 0d 1d e2 05 |I%,2)-S2|)^2)....|
|00004d90| 3a 0d 1d ec 0e dd 20 f2 | 6d 79 73 74 65 72 79 0d |:..... .|mystery.|
|00004da0| 1d f6 24 45 39 3d b3 28 | 31 29 20 3a 20 e7 20 45 |..$E9=.(|1) : . E|
|00004db0| 39 3c 2e 32 20 84 20 45 | 39 3e 2e 36 20 8c 20 8d |9<.2 . E|9>.6 . .|
|00004dc0| 64 76 5d 0d 1e 00 18 45 | 3d a8 28 45 2a 45 39 2b |dv]....E|=.(E*E9+|
|00004dd0| 31 29 20 3a 20 4d 59 53 | 25 3d b9 0d 1e 0a 3a f2 |1) : MYS|%=....:.|
|00004de0| 70 72 69 6e 74 65 72 28 | 32 2c 22 57 22 2c 22 53 |printer(|2,"W","S|
|00004df0| 43 49 45 4e 43 45 20 4f | 46 46 49 43 45 52 20 52 |CIENCE O|FFICER R|
|00004e00| 45 50 4f 52 54 49 4e 47 | 3a 22 29 20 3a 20 57 3d |EPORTING|:") : W=|
|00004e10| a6 28 34 30 29 0d 1e 14 | 3e f2 70 72 69 6e 74 65 |.(40)...|>.printe|
|00004e20| 72 28 32 2c 22 59 22 2c | 22 41 20 4d 59 53 54 45 |r(2,"Y",|"A MYSTE|
|00004e30| 52 59 20 50 4f 57 45 52 | 20 44 52 41 49 4e 20 48 |RY POWER| DRAIN H|
|00004e40| 41 53 20 4f 43 43 55 52 | 52 45 44 20 2e 2e 2e 2e |AS OCCUR|RED ....|
|00004e50| 2e 22 29 0d 1e 1e 1a f2 | 75 70 64 61 74 65 42 61 |.").....|updateBa|
|00004e60| 6e 6b 73 20 3a 20 57 3d | a6 28 34 30 29 0d 1e 28 |nks : W=|.(40)..(|
|00004e70| 42 f2 70 72 69 6e 74 65 | 72 28 32 2c 22 52 22 2c |B.printe|r(2,"R",|
|00004e80| 22 4f 4e 4c 59 20 22 2b | c3 28 45 29 2b 22 20 55 |"ONLY "+|.(E)+" U|
|00004e90| 4e 49 54 53 20 4f 46 20 | 50 4f 57 45 52 20 52 45 |NITS OF |POWER RE|
|00004ea0| 4d 41 49 4e 49 4e 47 20 | 2e 2e 2e 2e 2e 22 29 0d |MAINING |.....").|
|00004eb0| 1e 32 05 e1 0d 1e 3c 05 | 3a 0d 1e 46 10 dd 20 f2 |.2....<.|:..F.. .|
|00004ec0| 64 69 6c 69 74 68 69 75 | 6d 0d 1e 50 36 f2 70 72 |dilithiu|m..P6.pr|
|00004ed0| 69 6e 74 65 72 28 32 2c | 22 57 22 2c 22 45 4e 47 |inter(2,|"W","ENG|
|00004ee0| 49 4e 45 45 52 49 4e 47 | 20 52 45 50 4f 52 54 49 |INEERING| REPORTI|
|00004ef0| 4e 47 3a 22 29 20 3a 20 | 57 3d a6 28 34 30 29 0d |NG:") : |W=.(40).|
|00004f00| 1e 5a 41 f2 70 72 69 6e | 74 65 72 28 32 2c 22 59 |.ZA.prin|ter(2,"Y|
|00004f10| 22 2c 22 44 49 4c 49 54 | 48 49 55 4d 20 43 52 59 |","DILIT|HIUM CRY|
|00004f20| 53 54 41 4c 53 20 53 54 | 4f 4c 45 4e 20 42 59 20 |STALS ST|OLEN BY |
|00004f30| 49 4e 54 52 55 44 45 52 | 20 2e 2e 2e 2e 2e 22 29 |INTRUDER| .....")|
|00004f40| 0d 1e 64 20 44 28 37 29 | 3d 2d 31 45 32 20 3a 20 |..d D(7)|=-1E2 : |
|00004f50| 44 49 4c 25 3d b9 20 3a | 20 57 3d a6 28 34 30 29 |DIL%=. :| W=.(40)|
|00004f60| 0d 1e 6e 3d f2 70 72 69 | 6e 74 65 72 28 32 2c 22 |..n=.pri|nter(2,"|
|00004f70| 52 22 2c 22 4e 4f 20 50 | 4f 57 45 52 20 46 4f 52 |R","NO P|OWER FOR|
|00004f80| 20 57 41 52 50 20 44 52 | 49 56 45 20 2e 2e 2e 2e | WARP DR|IVE ....|
|00004f90| 2e 22 29 20 3a 20 57 3d | a6 28 34 30 29 0d 1e 78 |.") : W=|.(40)..x|
|00004fa0| 3a f2 70 72 69 6e 74 65 | 72 28 32 2c 22 52 22 2c |:.printe|r(2,"R",|
|00004fb0| 22 52 45 54 55 52 4e 20 | 54 4f 20 53 54 41 52 42 |"RETURN |TO STARB|
|00004fc0| 41 53 45 20 46 4f 52 20 | 52 45 50 41 49 52 53 20 |ASE FOR |REPAIRS |
|00004fd0| 2e 2e 2e 2e 2e 22 29 0d | 1e 82 05 e1 0d 1e 8c 05 |.....").|........|
|00004fe0| 3a 0d 1e 96 0e dd 20 f2 | 6e 65 75 74 72 6f 6e 0d |:..... .|neutron.|
|00004ff0| 1e a0 3a f2 70 72 69 6e | 74 65 72 28 32 2c 22 57 |..:.prin|ter(2,"W|
|00005000| 22 2c 22 53 43 49 45 4e | 43 45 20 4f 46 46 49 43 |","SCIEN|CE OFFIC|
|00005010| 45 52 20 52 45 50 4f 52 | 54 49 4e 47 3a 22 29 20 |ER REPOR|TING:") |
|00005020| 3a 20 57 3d a6 28 34 30 | 29 0d 1e aa 40 f2 70 72 |: W=.(40|)...@.pr|
|00005030| 69 6e 74 65 72 28 32 2c | 22 59 22 2c 22 43 4f 4c |inter(2,|"Y","COL|
|00005040| 4c 49 53 49 4f 4e 20 57 | 49 54 48 20 41 20 4e 45 |LISION W|ITH A NE|
|00005050| 55 54 52 4f 4e 20 4d 49 | 4e 45 20 48 41 53 20 4f |UTRON MI|NE HAS O|
|00005060| 43 43 55 52 52 45 44 22 | 29 0d 1e b4 20 57 3d a6 |CCURRED"|)... W=.|
|00005070| 28 34 30 29 20 3a 20 44 | 28 36 29 3d 2d 31 45 32 |(40) : D|(6)=-1E2|
|00005080| 20 3a 20 4e 45 55 25 3d | b9 0d 1e be 43 f2 70 72 | : NEU%=|....C.pr|
|00005090| 69 6e 74 65 72 28 32 2c | 22 52 22 2c 22 53 48 49 |inter(2,|"R","SHI|
|000050a0| 45 4c 44 53 20 44 49 53 | 41 42 4c 45 44 20 2d 20 |ELDS DIS|ABLED - |
|000050b0| 4e 4f 20 43 4f 4e 54 52 | 4f 4c 20 41 56 41 49 4c |NO CONTR|OL AVAIL|
|000050c0| 41 42 4c 45 20 2e 2e 2e | 2e 2e 22 29 0d 1e c8 44 |ABLE ...|..")...D|
|000050d0| 57 3d a6 28 34 30 29 20 | 3a 20 f2 70 72 69 6e 74 |W=.(40) |: .print|
|000050e0| 65 72 28 32 2c 22 52 22 | 2c 22 52 45 54 55 52 4e |er(2,"R"|,"RETURN|
|000050f0| 20 54 4f 20 53 54 41 52 | 42 41 53 45 20 46 4f 52 | TO STAR|BASE FOR|
|00005100| 20 52 45 50 41 49 52 53 | 20 2e 2e 2e 2e 2e 22 29 | REPAIRS| .....")|
|00005110| 0d 1e d2 05 e1 0d 1e dc | 05 3a 0d 1e e6 08 dd f2 |........|.:......|
|00005120| 58 59 0d 1e f0 2d 58 31 | 3d 43 28 43 31 2c 31 29 |XY...-X1|=C(C1,1)|
|00005130| 2b 28 43 28 43 31 2b 31 | 2c 31 29 2d 43 28 43 31 |+(C(C1+1|,1)-C(C1|
|00005140| 2c 31 29 29 2a 28 43 31 | 2d a8 28 43 31 29 29 0d |,1))*(C1|-.(C1)).|
|00005150| 1e fa 2d 58 32 3d 43 28 | 43 31 2c 32 29 2b 28 43 |..-X2=C(|C1,2)+(C|
|00005160| 28 43 31 2b 31 2c 32 29 | 2d 43 28 43 31 2c 32 29 |(C1+1,2)|-C(C1,2)|
|00005170| 29 2a 28 43 31 2d a8 28 | 43 31 29 29 0d 1f 04 05 |)*(C1-.(|C1))....|
|00005180| e1 0d 1f 0e 05 3a 0d 1f | 18 0e dd 20 f2 70 6f 69 |.....:..|... .poi|
|00005190| 6e 74 65 72 0d 1f 22 0e | de 20 44 61 74 61 20 34 |nter..".|. Data 4|
|000051a0| 30 30 0d 1f 2c 2a ff 20 | 22 4c 4f 41 44 20 3c 53 |00..,*. |"LOAD <S|
|000051b0| 74 72 65 6b 24 44 69 72 | 3e 2e 50 6f 69 6e 74 65 |trek$Dir|>.Pointe|
|000051c0| 72 20 22 2b c3 7e 28 44 | 61 74 61 29 0d 1f 36 22 |r "+.~(D|ata)..6"|
|000051d0| 44 61 74 61 3f 26 30 31 | 3d 32 20 3a 20 44 61 74 |Data?&01|=2 : Dat|
|000051e0| 61 21 26 30 36 3d 44 61 | 74 61 2b 26 30 41 0d 1f |a!&06=Da|ta+&0A..|
|000051f0| 40 18 c8 99 20 22 4f 53 | 5f 57 6f 72 64 22 2c 32 |@... "OS|_Word",2|
|00005200| 31 2c 44 61 74 61 0d 1f | 4a 0c 2a 50 4f 49 4e 54 |1,Data..|J.*POINT|
|00005210| 45 52 0d 1f 54 18 c8 97 | 20 c8 93 20 30 2c 31 32 |ER..T...| .. 0,12|
|00005220| 30 2c 31 32 38 30 2c 32 | 30 30 0d 1f 5e 14 c8 97 |0,1280,2|00..^...|
|00005230| 20 fb 20 31 2c 32 34 30 | 2c 31 39 32 2c 30 0d 1f | . 1,240|,192,0..|
|00005240| 68 12 c8 97 20 fb 20 33 | 2c 30 2c 30 2c 32 32 34 |h... . 3|,0,0,224|
|00005250| 0d 1f 72 0a c8 97 20 ee | 20 32 0d 1f 7c 05 e1 0d |..r... .| 2..|...|
|00005260| 1f 86 05 3a 0d 1f 90 0c | dd 20 f2 73 65 74 75 70 |...:....|. .setup|
|00005270| 0d 1f 9a 3b de 20 47 28 | 39 2c 39 29 2c 5a 28 39 |...;. G(|9,9),Z(9|
|00005280| 2c 39 29 2c 43 28 39 2c | 32 29 2c 4b 28 33 2c 33 |,9),C(9,|2),K(3,3|
|00005290| 29 2c 4e 28 33 29 2c 44 | 28 31 32 29 2c 51 24 28 |),N(3),D|(12),Q$(|
|000052a0| 39 2c 39 29 2c 44 24 28 | 31 32 29 0d 1f a4 25 43 |9,9),D$(|12)...%C|
|000052b0| 28 31 2c 31 29 3d 2d 31 | 20 3a 20 43 28 32 2c 31 |(1,1)=-1| : C(2,1|
|000052c0| 29 3d 2d 31 20 3a 20 43 | 28 37 2c 32 29 3d 2d 31 |)=-1 : C|(7,2)=-1|
|000052d0| 0d 1f ae 25 43 28 38 2c | 31 29 3d 2d 31 20 3a 20 |...%C(8,|1)=-1 : |
|000052e0| 43 28 38 2c 32 29 3d 2d | 31 20 3a 20 43 28 36 2c |C(8,2)=-|1 : C(6,|
|000052f0| 32 29 3d 2d 31 0d 1f b8 | 24 43 28 39 2c 31 29 3d |2)=-1...|$C(9,1)=|
|00005300| 2d 31 20 3a 20 43 28 31 | 2c 32 29 3d 30 20 20 3a |-1 : C(1|,2)=0  :|
|00005310| 20 43 28 33 2c 31 29 3d | 30 0d 1f c2 24 43 28 35 | C(3,1)=|0...$C(5|
|00005320| 2c 32 29 3d 30 20 20 3a | 20 43 28 37 2c 31 29 3d |,2)=0  :| C(7,1)=|
|00005330| 30 20 20 3a 20 43 28 39 | 2c 32 29 3d 30 0d 1f cc |0  : C(9|,2)=0...|
|00005340| 24 43 28 32 2c 32 29 3d | 31 20 20 3a 20 43 28 33 |$C(2,2)=|1  : C(3|
|00005350| 2c 32 29 3d 31 20 20 3a | 20 43 28 34 2c 31 29 3d |,2)=1  :| C(4,1)=|
|00005360| 31 0d 1f d6 24 43 28 34 | 2c 32 29 3d 31 20 20 3a |1...$C(4|,2)=1  :|
|00005370| 20 43 28 35 2c 31 29 3d | 31 20 20 3a 20 43 28 36 | C(5,1)=|1  : C(6|
|00005380| 2c 31 29 3d 31 0d 1f e0 | 27 f7 20 8d 64 6a 5f 20 |,1)=1...|'. .dj_ |
|00005390| 3a 20 e3 20 49 25 3d 31 | 20 b8 20 31 32 20 3a 20 |: . I%=1| . 12 : |
|000053a0| f3 20 44 24 28 49 25 29 | 20 3a 20 ed 0d 1f ea 40 |. D$(I%)| : ....@|
|000053b0| dc 20 53 48 4f 52 54 20 | 52 41 4e 47 45 20 53 45 |. SHORT |RANGE SE|
|000053c0| 4e 53 4f 52 53 2c 4c 4f | 4e 47 20 52 41 4e 47 45 |NSORS,LO|NG RANGE|
|000053d0| 20 53 45 4e 53 4f 52 53 | 2c 48 59 50 45 52 50 52 | SENSORS|,HYPERPR|
|000053e0| 4f 42 45 20 4c 41 55 4e | 43 48 45 52 0d 1f f4 33 |OBE LAUN|CHER...3|
|000053f0| dc 20 50 48 41 53 45 52 | 20 43 4f 4e 54 52 4f 4c |. PHASER| CONTROL|
|00005400| 2c 50 48 4f 54 4f 4e 20 | 54 55 42 45 53 2c 44 45 |,PHOTON |TUBES,DE|
|00005410| 46 4c 45 43 54 4f 52 20 | 43 4f 4e 54 52 4f 4c 0d |FLECTOR |CONTROL.|
|00005420| 1f fe 31 dc 20 57 41 52 | 50 20 45 4e 47 49 4e 45 |..1. WAR|P ENGINE|
|00005430| 53 2c 44 41 4d 41 47 45 | 20 43 4f 4e 54 52 4f 4c |S,DAMAGE| CONTROL|
|00005440| 2c 43 4f 4d 42 41 54 20 | 43 4f 4d 50 55 54 45 52 |,COMBAT |COMPUTER|
|00005450| 0d 20 08 37 dc 20 4e 41 | 56 49 47 41 54 49 4f 4e |. .7. NA|VIGATION|
|00005460| 20 43 4f 4d 50 55 54 45 | 52 2c 43 45 4e 54 52 41 | COMPUTE|R,CENTRA|
|00005470| 4c 20 43 4f 4d 50 55 54 | 45 52 2c 4c 49 46 45 20 |L COMPUT|ER,LIFE |
|00005480| 53 55 50 50 4f 52 54 0d | 20 12 05 e1 0d 20 1c 05 |SUPPORT.| .... ..|
|00005490| 3a 0d 20 26 0b dd 20 f2 | 69 6e 69 74 0d 20 30 2f |:. &.. .|init. 0/|
|000054a0| 54 3d 28 a8 28 28 b3 28 | 31 29 2b 33 29 2a 31 45 |T=(.((.(|1)+3)*1E|
|000054b0| 34 29 29 2f 31 30 20 3a | 20 54 30 3d 54 20 3a 20 |4))/10 :| T0=T : |
|000054c0| 4b 39 3d 30 20 3a 20 42 | 39 3d 30 0d 20 3a 2c 54 |K9=0 : B|9=0. :,T|
|000054d0| 39 3d 32 35 2b a8 28 b3 | 28 31 30 29 29 20 3a 20 |9=25+.(.|(10)) : |
|000054e0| 54 38 3d 54 39 2b 54 20 | 3a 20 51 34 3d 30 20 3a |T8=T9+T |: Q4=0 :|
|000054f0| 20 4d 41 50 25 3d 30 0d | 20 44 39 53 39 3d 32 30 | MAP%=0.| D9S9=20|
|00005500| 30 20 3a 20 45 30 3d 34 | 30 30 30 20 3a 20 50 30 |0 : E0=4|000 : P0|
|00005510| 3d 31 30 20 3a 20 50 3d | 50 30 20 3a 20 45 3d 45 |=10 : P=|P0 : E=E|
|00005520| 30 20 3a 20 45 31 3d 45 | 2b 31 20 3a 20 53 3d 30 |0 : E1=E|+1 : S=0|
|00005530| 0d 20 4e 20 44 28 29 3d | 34 20 3a 20 47 28 29 3d |. N D()=|4 : G()=|
|00005540| 30 20 3a 20 5a 28 29 3d | 30 20 3a 20 44 25 3d 30 |0 : Z()=|0 : D%=0|
|00005550| 0d 20 58 1b e3 20 49 25 | 3d 31 20 b8 20 38 20 3a |. X.. I%|=1 . 8 :|
|00005560| 20 e3 20 4a 25 3d 31 20 | b8 20 38 0d 20 62 12 52 | . J%=1 |. 8. b.R|
|00005570| 31 3d b3 28 31 29 20 3a | 20 4b 33 3d 30 0d 20 6c |1=.(1) :| K3=0. l|
|00005580| 12 e7 20 52 31 3e 2e 38 | 20 8c 20 4b 33 3d 31 0d |.. R1>.8| . K3=1.|
|00005590| 20 76 13 e7 20 52 31 3e | 2e 39 35 20 8c 20 4b 33 | v.. R1>|.95 . K3|
|000055a0| 3d 32 0d 20 80 13 e7 20 | 52 31 3e 2e 39 38 20 8c |=2. ... |R1>.98 .|
|000055b0| 20 4b 33 3d 33 0d 20 8a | 2f 4b 39 3d 4b 39 2b 4b | K3=3. .|/K9=K9+K|
|000055c0| 33 20 3a 20 52 31 3d b3 | 28 31 29 20 3a 20 42 33 |3 : R1=.|(1) : B3|
|000055d0| 3d 30 20 3a 20 e7 20 52 | 31 3e 2e 39 36 20 8c 20 |=0 : . R|1>.96 . |
|000055e0| 42 33 3d 31 0d 20 94 31 | 42 39 3d 42 39 2b 42 33 |B3=1. .1|B9=B9+B3|
|000055f0| 20 3a 20 53 33 3d b3 28 | 38 29 20 3a 20 47 28 49 | : S3=.(|8) : G(I|
|00005600| 25 2c 4a 25 29 3d 4b 33 | 2a 31 30 30 2b 42 33 2a |%,J%)=K3|*100+B3*|
|00005610| 31 30 2b 53 33 0d 20 9e | 09 ed 20 3a 20 ed 0d 20 |10+S3. .|.. : .. |
|00005620| a8 25 e7 20 42 39 3c 3d | 30 20 8c 20 47 28 36 2c |.%. B9<=|0 . G(6,|
|00005630| 33 29 3d 47 28 36 2c 33 | 29 2b 31 30 20 3a 20 42 |3)=G(6,3|)+10 : B|
|00005640| 39 3d 31 0d 20 b2 29 51 | 31 3d b3 28 38 29 20 3a |9=1. .)Q|1=.(8) :|
|00005650| 20 51 32 3d b3 28 38 29 | 20 3a 20 53 31 3d b3 28 | Q2=.(8)| : S1=.(|
|00005660| 38 29 20 3a 20 53 32 3d | b3 28 38 29 0d 20 bc 2d |8) : S2=|.(8). .-|
|00005670| 44 65 61 64 25 3d a3 20 | 3a 20 4d 59 53 25 3d a3 |Dead%=. |: MYS%=.|
|00005680| 20 3a 20 44 49 4c 25 3d | a3 20 3a 20 4e 45 55 25 | : DIL%=|. : NEU%|
|00005690| 3d a3 20 3a 20 56 25 3d | 30 0d 20 c6 05 e1 0d 20 |=. : V%=|0. .... |
|000056a0| d0 05 3a 0d 20 da 17 dd | 20 f2 70 72 69 6e 74 65 |..:. ...| .printe|
|000056b0| 72 28 61 2c 63 24 2c 61 | 24 29 0d 20 e4 15 ea 20 |r(a,c$,a|$). ... |
|000056c0| 42 2c 42 24 2c 58 2c 59 | 20 3a 20 58 3d 32 38 0d |B,B$,X,Y| : X=28.|
|000056d0| 20 ee 0a c8 8e 20 61 20 | ca 0d 20 f8 1b c9 20 31 | .... a |.. ... 1|
|000056e0| 20 3a 20 59 3d 38 32 34 | 20 3a 20 f2 63 6c 65 61 | : Y=824| : .clea|
|000056f0| 72 28 31 29 0d 21 02 1b | c9 20 32 20 3a 20 59 3d |r(1).!..|. 2 : Y=|
|00005700| 32 34 20 20 3a 20 f2 63 | 6c 65 61 72 28 36 29 0d |24  : .c|lear(6).|
|00005710| 21 0c 05 cb 0d 21 16 09 | e6 20 38 2c 30 0d 21 20 |!....!..|. 8,0.! |
|00005720| 1f e3 20 42 3d 31 20 b8 | 20 a9 28 61 24 29 20 3a |.. B=1 .| .(a$) :|
|00005730| 20 42 24 3d c1 61 24 2c | 42 2c 31 29 0d 21 2a 1d | B$=.a$,|B,1).!*.|
|00005740| e7 20 97 28 42 24 29 3c | 3e 31 33 20 80 20 97 28 |. .(B$)<|>13 . .(|
|00005750| 42 24 29 3c 3e 33 32 20 | 8c 0d 21 34 33 20 20 20 |B$)<>32 |..!43   |
|00005760| 20 20 3a 20 c8 99 20 22 | 4f 53 5f 53 70 72 69 74 |  : .. "|OS_Sprit|
|00005770| 65 4f 70 22 2c 32 39 30 | 2c 53 70 72 69 74 65 25 |eOp",290|,Sprite%|
|00005780| 2c 63 24 2b 42 24 2c 58 | 2c 59 2c 30 0d 21 3e 1a |,c$+B$,X|,Y,0.!>.|
|00005790| 20 20 20 20 20 3a 20 e7 | 20 42 24 3d 22 29 22 20 |     : .| B$=")" |
|000057a0| 8c 20 58 2b 3d 38 0d 21 | 48 24 20 20 20 20 20 3a |. X+=8.!|H$     :|
|000057b0| 20 e7 20 42 24 3d 22 4d | 22 20 84 20 42 24 3d 22 | . B$="M|" . B$="|
|000057c0| 57 22 20 8c 20 58 2b 3d | 31 36 0d 21 52 2d 20 20 |W" . X+=|16.!R-  |
|000057d0| 20 20 20 3a 20 e7 20 42 | 24 3d 22 49 22 20 84 20 |   : . B|$="I" . |
|000057e0| 42 24 3d 22 2e 22 20 84 | 20 42 24 3d 22 3a 22 20 |B$="." .| B$=":" |
|000057f0| 8c 20 58 2d 3d 31 36 0d | 21 5c 05 cd 0d 21 66 12 |. X-=16.|!\...!f.|
|00005800| 58 2b 3d 33 30 20 3a 20 | 57 3d a6 28 36 29 0d 21 |X+=30 : |W=.(6).!|
|00005810| 70 05 ed 0d 21 7a 05 e1 | 0d 21 84 05 3a 0d 21 8e |p...!z..|.!..:.!.|
|00005820| 14 dd 20 f2 6c 6f 6e 67 | 52 61 6e 67 65 53 63 61 |.. .long|RangeSca|
|00005830| 6e 0d 21 98 1b ea 20 41 | 2c 42 2c 43 2c 58 2c 59 |n.!... A|,B,C,X,Y|
|00005840| 20 3a 20 f2 63 6c 65 61 | 72 28 33 29 0d 21 a2 0e | : .clea|r(3).!..|
|00005850| e7 20 44 28 32 29 3c 30 | 20 8c 0d 21 ac 36 20 20 |. D(2)<0| ..!.6  |
|00005860| 20 20 20 3a 20 f2 74 65 | 78 74 28 33 30 38 2c 37 |   : .te|xt(308,7|
|00005870| 30 38 2c 22 52 22 2c 22 | 54 48 45 20 4c 4f 4e 47 |08,"R","|THE LONG|
|00005880| 20 52 41 4e 47 45 20 53 | 45 4e 53 4f 52 53 22 29 | RANGE S|ENSORS")|
|00005890| 0d 21 b6 35 20 20 20 20 | 20 3a 20 f2 74 65 78 74 |.!.5    | : .text|
|000058a0| 28 33 30 38 2c 36 35 36 | 2c 22 52 22 2c 22 41 52 |(308,656|,"R","AR|
|000058b0| 45 20 44 41 4d 41 47 45 | 44 20 2e 2e 2e 2e 2e 22 |E DAMAGE|D ....."|
|000058c0| 29 20 3a 20 e1 0d 21 c0 | 05 cd 0d 21 ca 1b 59 3d |) : ..!.|...!..Y=|
|000058d0| 36 36 34 20 3a 20 e3 20 | 41 3d 51 31 2d 31 20 b8 |664 : . |A=Q1-1 .|
|000058e0| 20 51 31 2b 31 0d 21 d4 | 24 58 3d 33 32 38 20 3a | Q1+1.!.|$X=328 :|
|000058f0| 20 4e 28 31 29 3d 30 20 | 3a 20 4e 28 32 29 3d 30 | N(1)=0 |: N(2)=0|
|00005900| 20 3a 20 4e 28 33 29 3d | 30 0d 21 de 13 e3 20 42 | : N(3)=|0.!... B|
|00005910| 3d 51 32 2d 31 20 b8 20 | 51 32 2b 31 0d 21 e8 3e |=Q2-1 . |Q2+1.!.>|
|00005920| e7 20 41 3e 30 20 80 20 | 41 3c 39 20 80 20 42 3e |. A>0 . |A<9 . B>|
|00005930| 30 20 80 20 42 3c 39 20 | 8c 20 4e 28 42 2d 51 32 |0 . B<9 |. N(B-Q2|
|00005940| 2b 32 29 3d 47 28 41 2c | 42 29 20 3a 20 5a 28 41 |+2)=G(A,|B) : Z(A|
|00005950| 2c 42 29 3d 47 28 41 2c | 42 29 0d 21 f2 05 ed 0d |,B)=G(A,|B).!....|
|00005960| 21 fc 0d e3 20 43 3d 31 | 20 b8 20 33 0d 22 06 1a |!... C=1| . 3."..|
|00005970| e6 20 38 20 3a 20 c8 93 | 20 c8 90 20 58 2c 59 2c |. 8 : ..| .. X,Y,|
|00005980| 32 30 38 2c 38 34 0d 22 | 10 29 e7 20 41 3d 51 31 |208,84."|.). A=Q1|
|00005990| 20 80 20 43 3d 32 20 8c | 20 e6 20 33 20 3a 20 c8 | . C=2 .| . 3 : .|
|000059a0| 93 20 c8 90 20 58 2c 59 | 2c 32 30 38 2c 38 34 0d |. .. X,Y|,208,84.|
|000059b0| 22 1a 1e e6 20 30 20 3a | 20 c8 93 20 c8 90 20 58 |"... 0 :| .. .. X|
|000059c0| 2b 34 2c 59 2b 34 2c 32 | 30 30 2c 37 36 0d 22 24 |+4,Y+4,2|00,76."$|
|000059d0| 33 e7 20 4e 28 43 29 3d | 30 20 20 8c 20 f2 74 65 |3. N(C)=|0  . .te|
|000059e0| 78 74 28 58 2b 32 36 2c | 59 2b 31 32 2c 22 57 22 |xt(X+26,|Y+12,"W"|
|000059f0| 2c 22 20 20 20 22 29 20 | 3a 20 e5 20 8d 44 60 62 |,"   ") |: . .D`b|
|00005a00| 0d 22 2e 35 e7 20 4e 28 | 43 29 3d 2d 31 20 8c 20 |.".5. N(|C)=-1 . |
|00005a10| f2 74 65 78 74 28 58 2b | 33 32 2c 59 2b 32 34 2c |.text(X+|32,Y+24,|
|00005a20| 22 59 22 2c 22 2a 20 2a | 20 2a 22 29 20 3a 20 e5 |"Y","* *| *") : .|
|00005a30| 20 8d 44 60 62 0d 22 38 | 17 71 24 3d c2 c3 28 4e | .D`b."8|.q$=..(N|
|00005a40| 28 43 29 2b 31 30 30 30 | 29 2c 33 29 0d 22 42 28 |(C)+1000|),3)."B(|
|00005a50| 6b 24 3d c0 71 24 2c 31 | 29 20 20 3a 20 f2 74 65 |k$=.q$,1|)  : .te|
|00005a60| 78 74 28 58 2b 33 32 2c | 59 2b 32 34 2c 22 52 22 |xt(X+32,|Y+24,"R"|
|00005a70| 2c 6b 24 29 0d 22 4c 29 | 73 24 3d c1 71 24 2c 32 |,k$)."L)|s$=.q$,2|
|00005a80| 2c 31 29 20 3a 20 f2 74 | 65 78 74 28 58 2b 39 36 |,1) : .t|ext(X+96|
|00005a90| 2c 59 2b 32 34 2c 22 42 | 22 2c 73 24 29 0d 22 56 |,Y+24,"B|",s$)."V|
|00005aa0| 28 70 24 3d c2 71 24 2c | 31 29 20 3a 20 f2 74 65 |(p$=.q$,|1) : .te|
|00005ab0| 78 74 28 58 2b 31 36 30 | 2c 59 2b 32 34 2c 22 59 |xt(X+160|,Y+24,"Y|
|00005ac0| 22 2c 70 24 29 0d 22 60 | 0e 58 2b 3d 32 32 30 20 |",p$)."`|.X+=220 |
|00005ad0| 3a 20 ed 0d 22 6a 0e 59 | 2d 3d 39 36 20 20 3a 20 |: .."j.Y|-=96  : |
|00005ae0| ed 0d 22 74 2d f2 66 6f | 6e 74 28 33 32 38 2c 34 |.."t-.fo|nt(328,4|
|00005af0| 36 30 2c 31 2c 22 31 20 | 2d 20 4e 55 4d 42 45 52 |60,1,"1 |- NUMBER|
|00005b00| 20 4f 46 20 4b 4c 49 4e | 47 4f 4e 53 22 29 0d 22 | OF KLIN|GONS")."|
|00005b10| 7e 2e f2 66 6f 6e 74 28 | 33 32 38 2c 34 32 34 2c |~..font(|328,424,|
|00005b20| 35 2c 22 32 20 2d 20 4e | 55 4d 42 45 52 20 4f 46 |5,"2 - N|UMBER OF|
|00005b30| 20 53 54 41 52 42 41 53 | 45 53 22 29 0d 22 88 2a | STARBAS|ES").".*|
|00005b40| f2 66 6f 6e 74 28 33 32 | 38 2c 33 38 34 2c 33 2c |.font(32|8,384,3,|
|00005b50| 22 33 20 2d 20 4e 55 4d | 42 45 52 20 4f 46 20 53 |"3 - NUM|BER OF S|
|00005b60| 54 41 52 53 22 29 0d 22 | 92 05 e1 0d 22 9c 05 3a |TARS")."|...."..:|
|00005b70| 0d 22 a6 12 dd 20 f2 63 | 6f 6d 70 75 74 65 72 4d |."... .c|omputerM|
|00005b80| 61 70 0d 22 b0 0f ea 20 | 41 2c 42 2c 43 2c 58 2c |ap."... |A,B,C,X,|
|00005b90| 59 0d 22 ba 25 f2 63 6c | 65 61 72 28 31 29 20 3a |Y.".%.cl|ear(1) :|
|00005ba0| 20 f2 63 6c 65 61 72 28 | 33 29 20 3a 20 f2 63 6c | .clear(|3) : .cl|
|00005bb0| 65 61 72 28 36 29 0d 22 | c4 0f e7 20 44 28 31 31 |ear(6)."|... D(11|
|00005bc0| 29 3c 30 20 8c 0d 22 ce | 37 20 20 20 20 20 3a 20 |)<0 ..".|7     : |
|00005bd0| f2 74 65 78 74 28 33 30 | 38 2c 37 30 38 2c 22 52 |.text(30|8,708,"R|
|00005be0| 22 2c 22 54 48 45 20 43 | 45 4e 54 52 41 4c 20 43 |","THE C|ENTRAL C|
|00005bf0| 4f 4d 50 55 54 45 52 20 | 49 53 22 29 0d 22 d8 31 |OMPUTER |IS").".1|
|00005c00| 20 20 20 20 20 3a 20 f2 | 74 65 78 74 28 33 30 38 |     : .|text(308|
|00005c10| 2c 36 35 36 2c 22 52 22 | 2c 22 44 41 4d 41 47 45 |,656,"R"|,"DAMAGE|
|00005c20| 44 20 2e 2e 2e 2e 2e 22 | 29 20 3a 20 e1 0d 22 e2 |D ....."|) : ..".|
|00005c30| 05 cd 0d 22 ec 15 59 3d | 37 30 38 20 3a 20 e3 20 |..."..Y=|708 : . |
|00005c40| 41 3d 30 20 b8 20 38 0d | 22 f6 15 58 3d 33 30 34 |A=0 . 8.|"..X=304|
|00005c50| 20 3a 20 e3 20 42 3d 30 | 20 b8 20 39 0d 23 00 17 | : . B=0| . 9.#..|
|00005c60| e7 20 41 3e 30 20 80 20 | 42 3e 30 20 80 20 42 3c |. A>0 . |B>0 . B<|
|00005c70| 39 20 8c 0d 23 0a 20 20 | 20 20 20 20 3a 20 e6 20 |9 ..#.  |    : . |
|00005c80| 38 20 3a 20 c8 93 20 c8 | 90 20 58 2c 59 2c 38 30 |8 : .. .|. X,Y,80|
|00005c90| 2c 34 34 0d 23 14 24 20 | 20 20 20 20 3a 20 e6 20 |,44.#.$ |    : . |
|00005ca0| 30 20 3a 20 c8 93 20 c8 | 90 20 58 2b 34 2c 59 2b |0 : .. .|. X+4,Y+|
|00005cb0| 34 2c 37 32 2c 33 36 0d | 23 1e 05 cd 0d 23 28 17 |4,72,36.|#....#(.|
|00005cc0| e7 20 41 3d 30 20 80 20 | 42 3e 30 20 80 20 42 3c |. A=0 . |B>0 . B<|
|00005cd0| 39 20 8c 0d 23 32 22 20 | 20 20 20 20 3a 20 f2 66 |9 ..#2" |    : .f|
|00005ce0| 6f 6e 74 28 58 2b 33 32 | 2c 59 2b 33 36 2c 37 2c |ont(X+32|,Y+36,7,|
|00005cf0| c3 28 42 29 29 0d 23 3c | 05 cd 0d 23 46 19 e7 20 |.(B)).#<|...#F.. |
|00005d00| 41 3e 30 20 80 20 28 42 | 3d 30 20 84 20 42 3d 39 |A>0 . (B|=0 . B=9|
|00005d10| 29 20 8c 0d 23 50 22 20 | 20 20 20 20 3a 20 f2 66 |) ..#P" |    : .f|
|00005d20| 6f 6e 74 28 58 2b 31 32 | 2c 59 2b 33 36 2c 37 2c |ont(X+12|,Y+36,7,|
|00005d30| c3 28 41 29 29 0d 23 5a | 05 cd 0d 23 64 17 e7 20 |.(A)).#Z|...#d.. |
|00005d40| 41 3e 30 20 80 20 42 3e | 30 20 80 20 42 3c 39 20 |A>0 . B>|0 . B<9 |
|00005d50| 8c 0d 23 6e 33 e7 20 5a | 28 41 2c 42 29 3d 30 20 |..#n3. Z|(A,B)=0 |
|00005d60| 20 8c 20 f2 66 6f 6e 74 | 28 58 2b 31 30 2c 59 2b | . .font|(X+10,Y+|
|00005d70| 33 36 2c 37 2c 22 20 20 | 20 22 29 20 3a 20 e5 20 |36,7,"  | ") : . |
|00005d80| 8d 74 60 63 0d 23 78 33 | e7 20 5a 28 41 2c 42 29 |.t`c.#x3|. Z(A,B)|
|00005d90| 3d 2d 31 20 8c 20 f2 66 | 6f 6e 74 28 58 2b 31 30 |=-1 . .f|ont(X+10|
|00005da0| 2c 59 2b 33 36 2c 33 2c | 22 2a 2a 2a 22 29 20 3a |,Y+36,3,|"***") :|
|00005db0| 20 e5 20 8d 74 60 63 0d | 23 82 11 43 3d 5a 28 41 | . .t`c.|#..C=Z(A|
|00005dc0| 2c 42 29 2b 31 30 30 30 | 0d 23 8c 1f f2 66 6f 6e |,B)+1000|.#...fon|
|00005dd0| 74 28 58 2b 31 32 2c 59 | 2b 33 36 2c 37 2c c2 c3 |t(X+12,Y|+36,7,..|
|00005de0| 28 43 29 2c 33 29 29 0d | 23 96 05 cd 0d 23 a0 0b |(C),3)).|#....#..|
|00005df0| e7 20 42 3e 30 20 8c 0d | 23 aa 10 20 20 20 20 20 |. B>0 ..|#..     |
|00005e00| 3a 20 58 2b 3d 37 38 0d | 23 b4 0d cc 20 3a 20 58 |: X+=78.|#... : X|
|00005e10| 2b 3d 33 36 0d 23 be 05 | cd 0d 23 c8 05 ed 0d 23 |+=36.#..|..#....#|
|00005e20| d2 0b e7 20 41 3e 30 20 | 8c 0d 23 dc 10 20 20 20 |... A>0 |..#..   |
|00005e30| 20 20 3a 20 59 2d 3d 34 | 34 0d 23 e6 0d cc 20 3a |  : Y-=4|4.#... :|
|00005e40| 20 59 2d 3d 34 30 0d 23 | f0 05 cd 0d 23 fa 05 ed | Y-=40.#|....#...|
|00005e50| 0d 24 04 27 58 3d 32 36 | 32 2b 28 51 32 2a 37 38 |.$.'X=26|2+(Q2*78|
|00005e60| 29 20 3a 20 59 3d 37 31 | 32 2d 28 51 31 2a 34 34 |) : Y=71|2-(Q1*44|
|00005e70| 29 20 3a 20 e6 20 33 0d | 24 0e 38 c8 93 20 58 2c |) : . 3.|$.8.. X,|
|00005e80| 59 2c 37 38 2c 34 34 20 | 3a 20 86 20 58 2b 32 2c |Y,78,44 |: . X+2,|
|00005e90| 59 2c 58 2b 32 2c 59 2b | 34 34 20 3a 20 86 20 58 |Y,X+2,Y+|44 : . X|
|00005ea0| 2b 38 30 2c 59 2c 58 2b | 38 30 2c 59 2b 34 34 0d |+80,Y,X+|80,Y+44.|
|00005eb0| 24 18 05 e1 0d 24 22 05 | 3a 0d 24 2c 21 dd 20 a4 |$....$".|:.$,!. .|
|00005ec0| 69 6e 70 75 74 28 78 25 | 2c 79 25 2c 78 31 2c 79 |input(x%|,y%,x1,y|
|00005ed0| 31 2c 63 25 2c 61 24 2c | 6e 29 0d 24 36 21 f2 66 |1,c%,a$,|n).$6!.f|
|00005ee0| 6f 6e 74 28 78 25 2c 79 | 25 2c 63 25 2c 61 24 29 |ont(x%,y|%,c%,a$)|
|00005ef0| 20 3a 20 54 65 6d 70 24 | 3d 22 22 0d 24 40 18 f5 | : Temp$|="".$@..|
|00005f00| 20 3a 20 f5 20 3a 20 47 | 3d a5 20 3a 20 fd 20 47 | : . : G|=. : . G|
|00005f10| 3e 31 32 0d 24 4a 30 e7 | 20 a7 22 30 31 32 33 34 |>12.$J0.| ."01234|
|00005f20| 35 36 37 38 39 2e 22 2c | bd 28 47 29 29 3c 3e 30 |56789.",|.(G))<>0|
|00005f30| 20 8c 20 54 65 6d 70 24 | 3d 54 65 6d 70 24 2b bd | . Temp$|=Temp$+.|
|00005f40| 28 47 29 0d 24 54 26 e7 | 20 47 3d 31 32 37 20 8c |(G).$T&.| G=127 .|
|00005f50| 20 54 65 6d 70 24 3d c0 | 54 65 6d 70 24 2c a9 28 | Temp$=.|Temp$,.(|
|00005f60| 54 65 6d 70 24 29 2d 31 | 29 0d 24 5e 31 e7 20 a9 |Temp$)-1|).$^1. .|
|00005f70| 28 54 65 6d 70 24 29 3e | 6e 20 8c 20 ef 20 37 20 |(Temp$)>|n . . 7 |
|00005f80| 3a 20 54 65 6d 70 24 3d | c0 54 65 6d 70 24 2c a9 |: Temp$=|.Temp$,.|
|00005f90| 28 54 65 6d 70 24 29 2d | 31 29 0d 24 68 19 e7 20 |(Temp$)-|1).$h.. |
|00005fa0| 54 65 6d 70 24 3c 22 22 | 20 8c 20 54 65 6d 70 24 |Temp$<""| . Temp$|
|00005fb0| 3d 22 22 0d 24 72 20 e6 | 20 30 20 3a 20 c8 93 20 |="".$r .| 0 : .. |
|00005fc0| c8 90 20 78 31 2c 79 31 | 2d 33 32 2c 6e 2a 32 30 |.. x1,y1|-32,n*20|
|00005fd0| 2c 33 32 0d 24 7c 32 e7 | 20 54 65 6d 70 24 3e 22 |,32.$|2.| Temp$>"|
|00005fe0| 22 20 80 20 54 65 6d 70 | 24 3c bd 31 32 37 20 8c |" . Temp|$<.127 .|
|00005ff0| 20 f2 66 6f 6e 74 28 78 | 31 2c 79 31 2c 31 2c 54 | .font(x|1,y1,1,T|
|00006000| 65 6d 70 24 29 0d 24 86 | 1c fd 20 47 3d 31 33 20 |emp$).$.|.. G=13 |
|00006010| 3a 20 e7 20 54 65 6d 70 | 24 3d 22 22 20 8c 20 3d |: . Temp|$="" . =|
|00006020| 30 0d 24 90 0d 3d bb 28 | 54 65 6d 70 24 29 0d 24 |0.$..=.(|Temp$).$|
|00006030| 9a 05 3a 0d 24 a4 22 dd | 20 a4 69 6e 70 75 74 32 |..:.$.".| .input2|
|00006040| 28 78 25 2c 79 25 2c 78 | 31 2c 79 31 2c 63 25 2c |(x%,y%,x|1,y1,c%,|
|00006050| 61 24 2c 6e 29 0d 24 ae | 21 f2 66 6f 6e 74 28 78 |a$,n).$.|!.font(x|
|00006060| 25 2c 79 25 2c 63 25 2c | 61 24 29 20 3a 20 54 65 |%,y%,c%,|a$) : Te|
|00006070| 6d 70 24 3d 22 22 0d 24 | b8 18 f5 20 3a 20 f5 20 |mp$="".$|... : . |
|00006080| 3a 20 47 3d a5 20 3a 20 | fd 20 47 3e 31 32 0d 24 |: G=. : |. G>12.$|
|00006090| c2 40 e7 20 a7 22 41 42 | 43 44 45 46 47 48 49 4a |.@. ."AB|CDEFGHIJ|
|000060a0| 4b 4c 4d 4e 4f 50 51 52 | 53 54 55 56 57 58 59 5a |KLMNOPQR|STUVWXYZ|
|000060b0| 20 22 2c bd 28 47 29 29 | 3c 3e 30 20 8c 20 54 65 | ",.(G))|<>0 . Te|
|000060c0| 6d 70 24 3d 54 65 6d 70 | 24 2b bd 28 47 29 0d 24 |mp$=Temp|$+.(G).$|
|000060d0| cc 26 e7 20 47 3d 31 32 | 37 20 8c 20 54 65 6d 70 |.&. G=12|7 . Temp|
|000060e0| 24 3d c0 54 65 6d 70 24 | 2c a9 28 54 65 6d 70 24 |$=.Temp$|,.(Temp$|
|000060f0| 29 2d 31 29 0d 24 d6 31 | e7 20 a9 28 54 65 6d 70 |)-1).$.1|. .(Temp|
|00006100| 24 29 3e 6e 20 8c 20 ef | 20 37 20 3a 20 54 65 6d |$)>n . .| 7 : Tem|
|00006110| 70 24 3d c0 54 65 6d 70 | 24 2c a9 28 54 65 6d 70 |p$=.Temp|$,.(Temp|
|00006120| 24 29 2d 31 29 0d 24 e0 | 19 e7 20 54 65 6d 70 24 |$)-1).$.|.. Temp$|
|00006130| 3c 22 22 20 8c 20 54 65 | 6d 70 24 3d 22 22 0d 24 |<"" . Te|mp$="".$|
|00006140| ea 20 e6 20 30 20 3a 20 | c8 93 20 c8 90 20 78 31 |. . 0 : |.. .. x1|
|00006150| 2c 79 31 2d 33 32 2c 6e | 2a 32 30 2c 33 32 0d 24 |,y1-32,n|*20,32.$|
|00006160| f4 32 e7 20 54 65 6d 70 | 24 3e 22 22 20 80 20 54 |.2. Temp|$>"" . T|
|00006170| 65 6d 70 24 3c bd 31 32 | 37 20 8c 20 f2 66 6f 6e |emp$<.12|7 . .fon|
|00006180| 74 28 78 31 2c 79 31 2c | 31 2c 54 65 6d 70 24 29 |t(x1,y1,|1,Temp$)|
|00006190| 0d 24 fe 0a fd 20 47 3d | 31 33 0d 25 08 0a 3d 54 |.$... G=|13.%..=T|
|000061a0| 65 6d 70 24 0d 25 12 05 | 3a 0d 25 1c 25 dd 20 a4 |emp$.%..|:.%.%. .|
|000061b0| 69 6e 70 75 74 4e 75 6d | 62 65 72 28 78 25 2c 79 |inputNum|ber(x%,y|
|000061c0| 25 2c 78 31 2c 79 31 2c | 63 24 2c 61 24 29 0d 25 |%,x1,y1,|c$,a$).%|
|000061d0| 26 21 f2 74 65 78 74 28 | 78 25 2c 79 25 2c 63 24 |&!.text(|x%,y%,c$|
|000061e0| 2c 61 24 29 20 3a 20 54 | 65 6d 70 24 3d 22 22 0d |,a$) : T|emp$="".|
|000061f0| 25 30 18 f5 20 3a 20 f5 | 20 3a 20 47 3d a5 20 3a |%0.. : .| : G=. :|
|00006200| 20 fd 20 47 3e 31 32 0d | 25 3a 1f e7 20 a7 22 30 | . G>12.|%:.. ."0|
|00006210| 31 32 33 34 35 36 37 38 | 39 2e 22 2c bd 28 47 29 |12345678|9.",.(G)|
|00006220| 29 3c 3e 30 20 8c 0d 25 | 44 1b 20 20 20 20 20 3a |)<>0 ..%|D.     :|
|00006230| 20 54 65 6d 70 24 3d 54 | 65 6d 70 24 2b bd 28 47 | Temp$=T|emp$+.(G|
|00006240| 29 0d 25 4e 05 cd 0d 25 | 58 26 e7 20 47 3d 31 32 |).%N...%|X&. G=12|
|00006250| 37 20 8c 20 54 65 6d 70 | 24 3d c0 54 65 6d 70 24 |7 . Temp|$=.Temp$|
|00006260| 2c a9 28 54 65 6d 70 24 | 29 2d 31 29 0d 25 62 19 |,.(Temp$|)-1).%b.|
|00006270| e7 20 54 65 6d 70 24 3c | 22 22 20 8c 20 54 65 6d |. Temp$<|"" . Tem|
|00006280| 70 24 3d 22 22 0d 25 6c | 1c e6 20 30 20 3a 20 c8 |p$="".%l|.. 0 : .|
|00006290| 93 20 c8 90 20 78 31 2c | 79 31 2c 31 30 38 2c 34 |. .. x1,|y1,108,4|
|000062a0| 30 0d 25 76 34 e7 20 54 | 65 6d 70 24 3e 22 22 20 |0.%v4. T|emp$>"" |
|000062b0| 80 20 54 65 6d 70 24 3c | bd 31 32 37 20 8c 20 f2 |. Temp$<|.127 . .|
|000062c0| 74 65 78 74 28 78 31 2c | 79 31 2c 22 52 22 2c 54 |text(x1,|y1,"R",T|
|000062d0| 65 6d 70 24 29 0d 25 80 | 1c fd 20 47 3d 31 33 20 |emp$).%.|.. G=13 |
|000062e0| 3a 20 e7 20 54 65 6d 70 | 24 3d 22 22 20 8c 20 3d |: . Temp|$="" . =|
|000062f0| 30 0d 25 8a 0d 3d bb 28 | 54 65 6d 70 24 29 0d 25 |0.%..=.(|Temp$).%|
|00006300| 94 05 3a 0d 25 9e 26 dd | 20 a4 69 6e 70 75 74 56 |..:.%.&.| .inputV|
|00006310| 61 72 69 6f 75 73 28 78 | 25 2c 79 25 2c 78 31 2c |arious(x|%,y%,x1,|
|00006320| 79 31 2c 63 24 2c 61 24 | 29 0d 25 a8 21 f2 74 65 |y1,c$,a$|).%.!.te|
|00006330| 78 74 28 78 25 2c 79 25 | 2c 63 24 2c 61 24 29 20 |xt(x%,y%|,c$,a$) |
|00006340| 3a 20 54 65 6d 70 24 3d | 22 22 0d 25 b2 18 f5 20 |: Temp$=|"".%... |
|00006350| 3a 20 f5 20 3a 20 47 3d | a5 20 3a 20 fd 20 47 3e |: . : G=|. : . G>|
|00006360| 31 32 0d 25 bc 39 e7 20 | a7 22 30 31 32 33 34 35 |12.%.9. |."012345|
|00006370| 36 37 38 39 2e 41 42 43 | 44 45 46 47 48 49 4a 4b |6789.ABC|DEFGHIJK|
|00006380| 4c 4d 4e 4f 50 51 52 53 | 54 55 56 57 58 59 5a 22 |LMNOPQRS|TUVWXYZ"|
|00006390| 2c bd 28 47 29 29 3c 3e | 30 20 8c 0d 25 c6 1b 20 |,.(G))<>|0 ..%.. |
|000063a0| 20 20 20 20 3a 20 54 65 | 6d 70 24 3d 54 65 6d 70 |    : Te|mp$=Temp|
|000063b0| 24 2b bd 28 47 29 0d 25 | d0 05 cd 0d 25 da 26 e7 |$+.(G).%|....%.&.|
|000063c0| 20 47 3d 31 32 37 20 8c | 20 54 65 6d 70 24 3d c0 | G=127 .| Temp$=.|
|000063d0| 54 65 6d 70 24 2c a9 28 | 54 65 6d 70 24 29 2d 31 |Temp$,.(|Temp$)-1|
|000063e0| 29 0d 25 e4 19 e7 20 54 | 65 6d 70 24 3c 22 22 20 |).%... T|emp$<"" |
|000063f0| 8c 20 54 65 6d 70 24 3d | 22 22 0d 25 ee 1c e6 20 |. Temp$=|"".%... |
+--------+-------------------------+-------------------------+--------+--------+